Home | History | Annotate | Download | only in misc
      1 #ifndef BLAS_H
      2 #define BLAS_H
      3 
      4 #ifdef __cplusplus
      5 extern "C"
      6 {
      7 #endif
      8 
      9 #define BLASFUNC(FUNC) FUNC##_
     10 
     11 #ifdef __WIN64__
     12 typedef long long BLASLONG;
     13 typedef unsigned long long BLASULONG;
     14 #else
     15 typedef long BLASLONG;
     16 typedef unsigned long BLASULONG;
     17 #endif
     18 
     19 int    BLASFUNC(xerbla)(const char *, int *info, int);
     20 
     21 float  BLASFUNC(sdot)  (int *, float  *, int *, float  *, int *);
     22 float  BLASFUNC(sdsdot)(int *, float  *,        float  *, int *, float  *, int *);
     23 
     24 double BLASFUNC(dsdot) (int *, float  *, int *, float  *, int *);
     25 double BLASFUNC(ddot)  (int *, double *, int *, double *, int *);
     26 double BLASFUNC(qdot)  (int *, double *, int *, double *, int *);
     27 
     28 int  BLASFUNC(cdotuw)  (int *, float  *, int *, float  *, int *, float*);
     29 int  BLASFUNC(cdotcw)  (int *, float  *, int *, float  *, int *, float*);
     30 int  BLASFUNC(zdotuw)  (int *, double  *, int *, double  *, int *, double*);
     31 int  BLASFUNC(zdotcw)  (int *, double  *, int *, double  *, int *, double*);
     32 
     33 int    BLASFUNC(saxpy) (int *, float  *, float  *, int *, float  *, int *);
     34 int    BLASFUNC(daxpy) (int *, double *, double *, int *, double *, int *);
     35 int    BLASFUNC(qaxpy) (int *, double *, double *, int *, double *, int *);
     36 int    BLASFUNC(caxpy) (int *, float  *, float  *, int *, float  *, int *);
     37 int    BLASFUNC(zaxpy) (int *, double *, double *, int *, double *, int *);
     38 int    BLASFUNC(xaxpy) (int *, double *, double *, int *, double *, int *);
     39 int    BLASFUNC(caxpyc)(int *, float  *, float  *, int *, float  *, int *);
     40 int    BLASFUNC(zaxpyc)(int *, double *, double *, int *, double *, int *);
     41 int    BLASFUNC(xaxpyc)(int *, double *, double *, int *, double *, int *);
     42 
     43 int    BLASFUNC(scopy) (int *, float  *, int *, float  *, int *);
     44 int    BLASFUNC(dcopy) (int *, double *, int *, double *, int *);
     45 int    BLASFUNC(qcopy) (int *, double *, int *, double *, int *);
     46 int    BLASFUNC(ccopy) (int *, float  *, int *, float  *, int *);
     47 int    BLASFUNC(zcopy) (int *, double *, int *, double *, int *);
     48 int    BLASFUNC(xcopy) (int *, double *, int *, double *, int *);
     49 
     50 int    BLASFUNC(sswap) (int *, float  *, int *, float  *, int *);
     51 int    BLASFUNC(dswap) (int *, double *, int *, double *, int *);
     52 int    BLASFUNC(qswap) (int *, double *, int *, double *, int *);
     53 int    BLASFUNC(cswap) (int *, float  *, int *, float  *, int *);
     54 int    BLASFUNC(zswap) (int *, double *, int *, double *, int *);
     55 int    BLASFUNC(xswap) (int *, double *, int *, double *, int *);
     56 
     57 float  BLASFUNC(sasum) (int *, float  *, int *);
     58 float  BLASFUNC(scasum)(int *, float  *, int *);
     59 double BLASFUNC(dasum) (int *, double *, int *);
     60 double BLASFUNC(qasum) (int *, double *, int *);
     61 double BLASFUNC(dzasum)(int *, double *, int *);
     62 double BLASFUNC(qxasum)(int *, double *, int *);
     63 
     64 int    BLASFUNC(isamax)(int *, float  *, int *);
     65 int    BLASFUNC(idamax)(int *, double *, int *);
     66 int    BLASFUNC(iqamax)(int *, double *, int *);
     67 int    BLASFUNC(icamax)(int *, float  *, int *);
     68 int    BLASFUNC(izamax)(int *, double *, int *);
     69 int    BLASFUNC(ixamax)(int *, double *, int *);
     70 
     71 int    BLASFUNC(ismax) (int *, float  *, int *);
     72 int    BLASFUNC(idmax) (int *, double *, int *);
     73 int    BLASFUNC(iqmax) (int *, double *, int *);
     74 int    BLASFUNC(icmax) (int *, float  *, int *);
     75 int    BLASFUNC(izmax) (int *, double *, int *);
     76 int    BLASFUNC(ixmax) (int *, double *, int *);
     77 
     78 int    BLASFUNC(isamin)(int *, float  *, int *);
     79 int    BLASFUNC(idamin)(int *, double *, int *);
     80 int    BLASFUNC(iqamin)(int *, double *, int *);
     81 int    BLASFUNC(icamin)(int *, float  *, int *);
     82 int    BLASFUNC(izamin)(int *, double *, int *);
     83 int    BLASFUNC(ixamin)(int *, double *, int *);
     84 
     85 int    BLASFUNC(ismin)(int *, float  *, int *);
     86 int    BLASFUNC(idmin)(int *, double *, int *);
     87 int    BLASFUNC(iqmin)(int *, double *, int *);
     88 int    BLASFUNC(icmin)(int *, float  *, int *);
     89 int    BLASFUNC(izmin)(int *, double *, int *);
     90 int    BLASFUNC(ixmin)(int *, double *, int *);
     91 
     92 float  BLASFUNC(samax) (int *, float  *, int *);
     93 double BLASFUNC(damax) (int *, double *, int *);
     94 double BLASFUNC(qamax) (int *, double *, int *);
     95 float  BLASFUNC(scamax)(int *, float  *, int *);
     96 double BLASFUNC(dzamax)(int *, double *, int *);
     97 double BLASFUNC(qxamax)(int *, double *, int *);
     98 
     99 float  BLASFUNC(samin) (int *, float  *, int *);
    100 double BLASFUNC(damin) (int *, double *, int *);
    101 double BLASFUNC(qamin) (int *, double *, int *);
    102 float  BLASFUNC(scamin)(int *, float  *, int *);
    103 double BLASFUNC(dzamin)(int *, double *, int *);
    104 double BLASFUNC(qxamin)(int *, double *, int *);
    105 
    106 float  BLASFUNC(smax)  (int *, float  *, int *);
    107 double BLASFUNC(dmax)  (int *, double *, int *);
    108 double BLASFUNC(qmax)  (int *, double *, int *);
    109 float  BLASFUNC(scmax) (int *, float  *, int *);
    110 double BLASFUNC(dzmax) (int *, double *, int *);
    111 double BLASFUNC(qxmax) (int *, double *, int *);
    112 
    113 float  BLASFUNC(smin)  (int *, float  *, int *);
    114 double BLASFUNC(dmin)  (int *, double *, int *);
    115 double BLASFUNC(qmin)  (int *, double *, int *);
    116 float  BLASFUNC(scmin) (int *, float  *, int *);
    117 double BLASFUNC(dzmin) (int *, double *, int *);
    118 double BLASFUNC(qxmin) (int *, double *, int *);
    119 
    120 int    BLASFUNC(sscal) (int *,  float  *, float  *, int *);
    121 int    BLASFUNC(dscal) (int *,  double *, double *, int *);
    122 int    BLASFUNC(qscal) (int *,  double *, double *, int *);
    123 int    BLASFUNC(cscal) (int *,  float  *, float  *, int *);
    124 int    BLASFUNC(zscal) (int *,  double *, double *, int *);
    125 int    BLASFUNC(xscal) (int *,  double *, double *, int *);
    126 int    BLASFUNC(csscal)(int *,  float  *, float  *, int *);
    127 int    BLASFUNC(zdscal)(int *,  double *, double *, int *);
    128 int    BLASFUNC(xqscal)(int *,  double *, double *, int *);
    129 
    130 float  BLASFUNC(snrm2) (int *, float  *, int *);
    131 float  BLASFUNC(scnrm2)(int *, float  *, int *);
    132 
    133 double BLASFUNC(dnrm2) (int *, double *, int *);
    134 double BLASFUNC(qnrm2) (int *, double *, int *);
    135 double BLASFUNC(dznrm2)(int *, double *, int *);
    136 double BLASFUNC(qxnrm2)(int *, double *, int *);
    137 
    138 int    BLASFUNC(srot)  (int *, float  *, int *, float  *, int *, float  *, float  *);
    139 int    BLASFUNC(drot)  (int *, double *, int *, double *, int *, double *, double *);
    140 int    BLASFUNC(qrot)  (int *, double *, int *, double *, int *, double *, double *);
    141 int    BLASFUNC(csrot) (int *, float  *, int *, float  *, int *, float  *, float  *);
    142 int    BLASFUNC(zdrot) (int *, double *, int *, double *, int *, double *, double *);
    143 int    BLASFUNC(xqrot) (int *, double *, int *, double *, int *, double *, double *);
    144 
    145 int    BLASFUNC(srotg) (float  *, float  *, float  *, float  *);
    146 int    BLASFUNC(drotg) (double *, double *, double *, double *);
    147 int    BLASFUNC(qrotg) (double *, double *, double *, double *);
    148 int    BLASFUNC(crotg) (float  *, float  *, float  *, float  *);
    149 int    BLASFUNC(zrotg) (double *, double *, double *, double *);
    150 int    BLASFUNC(xrotg) (double *, double *, double *, double *);
    151 
    152 int    BLASFUNC(srotmg)(float  *, float  *, float  *, float  *, float  *);
    153 int    BLASFUNC(drotmg)(double *, double *, double *, double *, double *);
    154 
    155 int    BLASFUNC(srotm) (int *, float  *, int *, float  *, int *, float  *);
    156 int    BLASFUNC(drotm) (int *, double *, int *, double *, int *, double *);
    157 int    BLASFUNC(qrotm) (int *, double *, int *, double *, int *, double *);
    158 
    159 /* Level 2 routines */
    160 
    161 int BLASFUNC(sger)(int *,    int *, float *,  float *, int *,
    162 		   float *,  int *, float *,  int *);
    163 int BLASFUNC(dger)(int *,    int *, double *, double *, int *,
    164 		   double *, int *, double *, int *);
    165 int BLASFUNC(qger)(int *,    int *, double *, double *, int *,
    166 		   double *, int *, double *, int *);
    167 int BLASFUNC(cgeru)(int *,    int *, float *,  float *, int *,
    168 		    float *,  int *, float *,  int *);
    169 int BLASFUNC(cgerc)(int *,    int *, float *,  float *, int *,
    170 		    float *,  int *, float *,  int *);
    171 int BLASFUNC(zgeru)(int *,    int *, double *, double *, int *,
    172 		    double *, int *, double *, int *);
    173 int BLASFUNC(zgerc)(int *,    int *, double *, double *, int *,
    174 		    double *, int *, double *, int *);
    175 int BLASFUNC(xgeru)(int *,    int *, double *, double *, int *,
    176 		    double *, int *, double *, int *);
    177 int BLASFUNC(xgerc)(int *,    int *, double *, double *, int *,
    178 		    double *, int *, double *, int *);
    179 
    180 int BLASFUNC(sgemv)(char *, int *, int *, float  *, float  *, int *,
    181 		    float  *, int *, float  *, float  *, int *);
    182 int BLASFUNC(dgemv)(char *, int *, int *, double *, double *, int *,
    183 		    double *, int *, double *, double *, int *);
    184 int BLASFUNC(qgemv)(char *, int *, int *, double *, double *, int *,
    185 		    double *, int *, double *, double *, int *);
    186 int BLASFUNC(cgemv)(char *, int *, int *, float  *, float  *, int *,
    187 		    float  *, int *, float  *, float  *, int *);
    188 int BLASFUNC(zgemv)(char *, int *, int *, double *, double *, int *,
    189 		    double *, int *, double *, double *, int *);
    190 int BLASFUNC(xgemv)(char *, int *, int *, double *, double *, int *,
    191 		    double *, int *, double *, double *, int *);
    192 
    193 int BLASFUNC(strsv) (char *, char *, char *, int *, float  *, int *,
    194 		     float  *, int *);
    195 int BLASFUNC(dtrsv) (char *, char *, char *, int *, double *, int *,
    196 		     double *, int *);
    197 int BLASFUNC(qtrsv) (char *, char *, char *, int *, double *, int *,
    198 		     double *, int *);
    199 int BLASFUNC(ctrsv) (char *, char *, char *, int *, float  *, int *,
    200 		     float  *, int *);
    201 int BLASFUNC(ztrsv) (char *, char *, char *, int *, double *, int *,
    202 		     double *, int *);
    203 int BLASFUNC(xtrsv) (char *, char *, char *, int *, double *, int *,
    204 		     double *, int *);
    205 
    206 int BLASFUNC(stpsv) (char *, char *, char *, int *, float  *, float  *, int *);
    207 int BLASFUNC(dtpsv) (char *, char *, char *, int *, double *, double *, int *);
    208 int BLASFUNC(qtpsv) (char *, char *, char *, int *, double *, double *, int *);
    209 int BLASFUNC(ctpsv) (char *, char *, char *, int *, float  *, float  *, int *);
    210 int BLASFUNC(ztpsv) (char *, char *, char *, int *, double *, double *, int *);
    211 int BLASFUNC(xtpsv) (char *, char *, char *, int *, double *, double *, int *);
    212 
    213 int BLASFUNC(strmv) (char *, char *, char *, int *, float  *, int *,
    214 		     float  *, int *);
    215 int BLASFUNC(dtrmv) (char *, char *, char *, int *, double *, int *,
    216 		     double *, int *);
    217 int BLASFUNC(qtrmv) (char *, char *, char *, int *, double *, int *,
    218 		     double *, int *);
    219 int BLASFUNC(ctrmv) (char *, char *, char *, int *, float  *, int *,
    220 		     float  *, int *);
    221 int BLASFUNC(ztrmv) (char *, char *, char *, int *, double *, int *,
    222 		     double *, int *);
    223 int BLASFUNC(xtrmv) (char *, char *, char *, int *, double *, int *,
    224 		     double *, int *);
    225 
    226 int BLASFUNC(stpmv) (char *, char *, char *, int *, float  *, float  *, int *);
    227 int BLASFUNC(dtpmv) (char *, char *, char *, int *, double *, double *, int *);
    228 int BLASFUNC(qtpmv) (char *, char *, char *, int *, double *, double *, int *);
    229 int BLASFUNC(ctpmv) (char *, char *, char *, int *, float  *, float  *, int *);
    230 int BLASFUNC(ztpmv) (char *, char *, char *, int *, double *, double *, int *);
    231 int BLASFUNC(xtpmv) (char *, char *, char *, int *, double *, double *, int *);
    232 
    233 int BLASFUNC(stbmv) (char *, char *, char *, int *, int *, float  *, int *, float  *, int *);
    234 int BLASFUNC(dtbmv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    235 int BLASFUNC(qtbmv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    236 int BLASFUNC(ctbmv) (char *, char *, char *, int *, int *, float  *, int *, float  *, int *);
    237 int BLASFUNC(ztbmv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    238 int BLASFUNC(xtbmv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    239 
    240 int BLASFUNC(stbsv) (char *, char *, char *, int *, int *, float  *, int *, float  *, int *);
    241 int BLASFUNC(dtbsv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    242 int BLASFUNC(qtbsv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    243 int BLASFUNC(ctbsv) (char *, char *, char *, int *, int *, float  *, int *, float  *, int *);
    244 int BLASFUNC(ztbsv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    245 int BLASFUNC(xtbsv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    246 
    247 int BLASFUNC(ssymv) (char *, int *, float  *, float *, int *,
    248 		     float  *, int *, float *, float *, int *);
    249 int BLASFUNC(dsymv) (char *, int *, double  *, double *, int *,
    250 		     double  *, int *, double *, double *, int *);
    251 int BLASFUNC(qsymv) (char *, int *, double  *, double *, int *,
    252 		     double  *, int *, double *, double *, int *);
    253 int BLASFUNC(csymv) (char *, int *, float  *, float *, int *,
    254 		     float  *, int *, float *, float *, int *);
    255 int BLASFUNC(zsymv) (char *, int *, double  *, double *, int *,
    256 		     double  *, int *, double *, double *, int *);
    257 int BLASFUNC(xsymv) (char *, int *, double  *, double *, int *,
    258 		     double  *, int *, double *, double *, int *);
    259 
    260 int BLASFUNC(sspmv) (char *, int *, float  *, float *,
    261 		     float  *, int *, float *, float *, int *);
    262 int BLASFUNC(dspmv) (char *, int *, double  *, double *,
    263 		     double  *, int *, double *, double *, int *);
    264 int BLASFUNC(qspmv) (char *, int *, double  *, double *,
    265 		     double  *, int *, double *, double *, int *);
    266 int BLASFUNC(cspmv) (char *, int *, float  *, float *,
    267 		     float  *, int *, float *, float *, int *);
    268 int BLASFUNC(zspmv) (char *, int *, double  *, double *,
    269 		     double  *, int *, double *, double *, int *);
    270 int BLASFUNC(xspmv) (char *, int *, double  *, double *,
    271 		     double  *, int *, double *, double *, int *);
    272 
    273 int BLASFUNC(ssyr) (char *, int *, float   *, float  *, int *,
    274 		    float  *, int *);
    275 int BLASFUNC(dsyr) (char *, int *, double  *, double *, int *,
    276 		    double *, int *);
    277 int BLASFUNC(qsyr) (char *, int *, double  *, double *, int *,
    278 		    double *, int *);
    279 int BLASFUNC(csyr) (char *, int *, float   *, float  *, int *,
    280 		    float  *, int *);
    281 int BLASFUNC(zsyr) (char *, int *, double  *, double *, int *,
    282 		    double *, int *);
    283 int BLASFUNC(xsyr) (char *, int *, double  *, double *, int *,
    284 		    double *, int *);
    285 
    286 int BLASFUNC(ssyr2) (char *, int *, float   *,
    287 		     float  *, int *, float  *, int *, float  *, int *);
    288 int BLASFUNC(dsyr2) (char *, int *, double  *,
    289 		     double *, int *, double *, int *, double *, int *);
    290 int BLASFUNC(qsyr2) (char *, int *, double  *,
    291 		     double *, int *, double *, int *, double *, int *);
    292 int BLASFUNC(csyr2) (char *, int *, float   *,
    293 		     float  *, int *, float  *, int *, float  *, int *);
    294 int BLASFUNC(zsyr2) (char *, int *, double  *,
    295 		     double *, int *, double *, int *, double *, int *);
    296 int BLASFUNC(xsyr2) (char *, int *, double  *,
    297 		     double *, int *, double *, int *, double *, int *);
    298 
    299 int BLASFUNC(sspr) (char *, int *, float   *, float  *, int *,
    300 		    float  *);
    301 int BLASFUNC(dspr) (char *, int *, double  *, double *, int *,
    302 		    double *);
    303 int BLASFUNC(qspr) (char *, int *, double  *, double *, int *,
    304 		    double *);
    305 int BLASFUNC(cspr) (char *, int *, float   *, float  *, int *,
    306 		    float  *);
    307 int BLASFUNC(zspr) (char *, int *, double  *, double *, int *,
    308 		    double *);
    309 int BLASFUNC(xspr) (char *, int *, double  *, double *, int *,
    310 		    double *);
    311 
    312 int BLASFUNC(sspr2) (char *, int *, float   *,
    313 		     float  *, int *, float  *, int *, float  *);
    314 int BLASFUNC(dspr2) (char *, int *, double  *,
    315 		     double *, int *, double *, int *, double *);
    316 int BLASFUNC(qspr2) (char *, int *, double  *,
    317 		     double *, int *, double *, int *, double *);
    318 int BLASFUNC(cspr2) (char *, int *, float   *,
    319 		     float  *, int *, float  *, int *, float  *);
    320 int BLASFUNC(zspr2) (char *, int *, double  *,
    321 		     double *, int *, double *, int *, double *);
    322 int BLASFUNC(xspr2) (char *, int *, double  *,
    323 		     double *, int *, double *, int *, double *);
    324 
    325 int BLASFUNC(cher) (char *, int *, float   *, float  *, int *,
    326 		    float  *, int *);
    327 int BLASFUNC(zher) (char *, int *, double  *, double *, int *,
    328 		    double *, int *);
    329 int BLASFUNC(xher) (char *, int *, double  *, double *, int *,
    330 		    double *, int *);
    331 
    332 int BLASFUNC(chpr) (char *, int *, float   *, float  *, int *, float  *);
    333 int BLASFUNC(zhpr) (char *, int *, double  *, double *, int *, double *);
    334 int BLASFUNC(xhpr) (char *, int *, double  *, double *, int *, double *);
    335 
    336 int BLASFUNC(cher2) (char *, int *, float   *,
    337 		     float  *, int *, float  *, int *, float  *, int *);
    338 int BLASFUNC(zher2) (char *, int *, double  *,
    339 		     double *, int *, double *, int *, double *, int *);
    340 int BLASFUNC(xher2) (char *, int *, double  *,
    341 		     double *, int *, double *, int *, double *, int *);
    342 
    343 int BLASFUNC(chpr2) (char *, int *, float   *,
    344 		     float  *, int *, float  *, int *, float  *);
    345 int BLASFUNC(zhpr2) (char *, int *, double  *,
    346 		     double *, int *, double *, int *, double *);
    347 int BLASFUNC(xhpr2) (char *, int *, double  *,
    348 		     double *, int *, double *, int *, double *);
    349 
    350 int BLASFUNC(chemv) (char *, int *, float  *, float *, int *,
    351 		     float  *, int *, float *, float *, int *);
    352 int BLASFUNC(zhemv) (char *, int *, double  *, double *, int *,
    353 		     double  *, int *, double *, double *, int *);
    354 int BLASFUNC(xhemv) (char *, int *, double  *, double *, int *,
    355 		     double  *, int *, double *, double *, int *);
    356 
    357 int BLASFUNC(chpmv) (char *, int *, float  *, float *,
    358 		     float  *, int *, float *, float *, int *);
    359 int BLASFUNC(zhpmv) (char *, int *, double  *, double *,
    360 		     double  *, int *, double *, double *, int *);
    361 int BLASFUNC(xhpmv) (char *, int *, double  *, double *,
    362 		     double  *, int *, double *, double *, int *);
    363 
    364 int BLASFUNC(snorm)(char *, int *, int *, float  *, int *);
    365 int BLASFUNC(dnorm)(char *, int *, int *, double *, int *);
    366 int BLASFUNC(cnorm)(char *, int *, int *, float  *, int *);
    367 int BLASFUNC(znorm)(char *, int *, int *, double *, int *);
    368 
    369 int BLASFUNC(sgbmv)(char *, int *, int *, int *, int *, float  *, float  *, int *,
    370 		    float  *, int *, float  *, float  *, int *);
    371 int BLASFUNC(dgbmv)(char *, int *, int *, int *, int *, double *, double *, int *,
    372 		    double *, int *, double *, double *, int *);
    373 int BLASFUNC(qgbmv)(char *, int *, int *, int *, int *, double *, double *, int *,
    374 		    double *, int *, double *, double *, int *);
    375 int BLASFUNC(cgbmv)(char *, int *, int *, int *, int *, float  *, float  *, int *,
    376 		    float  *, int *, float  *, float  *, int *);
    377 int BLASFUNC(zgbmv)(char *, int *, int *, int *, int *, double *, double *, int *,
    378 		    double *, int *, double *, double *, int *);
    379 int BLASFUNC(xgbmv)(char *, int *, int *, int *, int *, double *, double *, int *,
    380 		    double *, int *, double *, double *, int *);
    381 
    382 int BLASFUNC(ssbmv)(char *, int *, int *, float  *, float  *, int *,
    383 		    float  *, int *, float  *, float  *, int *);
    384 int BLASFUNC(dsbmv)(char *, int *, int *, double *, double *, int *,
    385 		    double *, int *, double *, double *, int *);
    386 int BLASFUNC(qsbmv)(char *, int *, int *, double *, double *, int *,
    387 		    double *, int *, double *, double *, int *);
    388 int BLASFUNC(csbmv)(char *, int *, int *, float  *, float  *, int *,
    389 		    float  *, int *, float  *, float  *, int *);
    390 int BLASFUNC(zsbmv)(char *, int *, int *, double *, double *, int *,
    391 		    double *, int *, double *, double *, int *);
    392 int BLASFUNC(xsbmv)(char *, int *, int *, double *, double *, int *,
    393 		    double *, int *, double *, double *, int *);
    394 
    395 int BLASFUNC(chbmv)(char *, int *, int *, float  *, float  *, int *,
    396 		    float  *, int *, float  *, float  *, int *);
    397 int BLASFUNC(zhbmv)(char *, int *, int *, double *, double *, int *,
    398 		    double *, int *, double *, double *, int *);
    399 int BLASFUNC(xhbmv)(char *, int *, int *, double *, double *, int *,
    400 		    double *, int *, double *, double *, int *);
    401 
    402 /* Level 3 routines */
    403 
    404 int BLASFUNC(sgemm)(char *, char *, int *, int *, int *, float *,
    405 	   float  *, int *, float  *, int *, float  *, float  *, int *);
    406 int BLASFUNC(dgemm)(char *, char *, int *, int *, int *, double *,
    407 	   double *, int *, double *, int *, double *, double *, int *);
    408 int BLASFUNC(qgemm)(char *, char *, int *, int *, int *, double *,
    409 	   double *, int *, double *, int *, double *, double *, int *);
    410 int BLASFUNC(cgemm)(char *, char *, int *, int *, int *, float *,
    411 	   float  *, int *, float  *, int *, float  *, float  *, int *);
    412 int BLASFUNC(zgemm)(char *, char *, int *, int *, int *, double *,
    413 	   double *, int *, double *, int *, double *, double *, int *);
    414 int BLASFUNC(xgemm)(char *, char *, int *, int *, int *, double *,
    415 	   double *, int *, double *, int *, double *, double *, int *);
    416 
    417 int BLASFUNC(cgemm3m)(char *, char *, int *, int *, int *, float *,
    418 	   float  *, int *, float  *, int *, float  *, float  *, int *);
    419 int BLASFUNC(zgemm3m)(char *, char *, int *, int *, int *, double *,
    420 	   double *, int *, double *, int *, double *, double *, int *);
    421 int BLASFUNC(xgemm3m)(char *, char *, int *, int *, int *, double *,
    422 	   double *, int *, double *, int *, double *, double *, int *);
    423 
    424 int BLASFUNC(sge2mm)(char *, char *, char *, int *, int *,
    425 		     float *, float  *, int *, float  *, int *,
    426 		     float *, float  *, int *);
    427 int BLASFUNC(dge2mm)(char *, char *, char *, int *, int *,
    428 		     double *, double  *, int *, double  *, int *,
    429 		     double *, double  *, int *);
    430 int BLASFUNC(cge2mm)(char *, char *, char *, int *, int *,
    431 		     float *, float  *, int *, float  *, int *,
    432 		     float *, float  *, int *);
    433 int BLASFUNC(zge2mm)(char *, char *, char *, int *, int *,
    434 		     double *, double  *, int *, double  *, int *,
    435 		     double *, double  *, int *);
    436 
    437 int BLASFUNC(strsm)(char *, char *, char *, char *, int *, int *,
    438 	   float *,  float *, int *, float *, int *);
    439 int BLASFUNC(dtrsm)(char *, char *, char *, char *, int *, int *,
    440 	   double *,  double *, int *, double *, int *);
    441 int BLASFUNC(qtrsm)(char *, char *, char *, char *, int *, int *,
    442 	   double *,  double *, int *, double *, int *);
    443 int BLASFUNC(ctrsm)(char *, char *, char *, char *, int *, int *,
    444 	   float *,  float *, int *, float *, int *);
    445 int BLASFUNC(ztrsm)(char *, char *, char *, char *, int *, int *,
    446 	   double *,  double *, int *, double *, int *);
    447 int BLASFUNC(xtrsm)(char *, char *, char *, char *, int *, int *,
    448 	   double *,  double *, int *, double *, int *);
    449 
    450 int BLASFUNC(strmm)(char *, char *, char *, char *, int *, int *,
    451 	   float *,  float *, int *, float *, int *);
    452 int BLASFUNC(dtrmm)(char *, char *, char *, char *, int *, int *,
    453 	   double *,  double *, int *, double *, int *);
    454 int BLASFUNC(qtrmm)(char *, char *, char *, char *, int *, int *,
    455 	   double *,  double *, int *, double *, int *);
    456 int BLASFUNC(ctrmm)(char *, char *, char *, char *, int *, int *,
    457 	   float *,  float *, int *, float *, int *);
    458 int BLASFUNC(ztrmm)(char *, char *, char *, char *, int *, int *,
    459 	   double *,  double *, int *, double *, int *);
    460 int BLASFUNC(xtrmm)(char *, char *, char *, char *, int *, int *,
    461 	   double *,  double *, int *, double *, int *);
    462 
    463 int BLASFUNC(ssymm)(char *, char *, int *, int *, float  *, float  *, int *,
    464 	   float  *, int *, float  *, float  *, int *);
    465 int BLASFUNC(dsymm)(char *, char *, int *, int *, double *, double *, int *,
    466 	   double *, int *, double *, double *, int *);
    467 int BLASFUNC(qsymm)(char *, char *, int *, int *, double *, double *, int *,
    468 	   double *, int *, double *, double *, int *);
    469 int BLASFUNC(csymm)(char *, char *, int *, int *, float  *, float  *, int *,
    470 	   float  *, int *, float  *, float  *, int *);
    471 int BLASFUNC(zsymm)(char *, char *, int *, int *, double *, double *, int *,
    472 	   double *, int *, double *, double *, int *);
    473 int BLASFUNC(xsymm)(char *, char *, int *, int *, double *, double *, int *,
    474 	   double *, int *, double *, double *, int *);
    475 
    476 int BLASFUNC(csymm3m)(char *, char *, int *, int *, float  *, float  *, int *,
    477 	   float  *, int *, float  *, float  *, int *);
    478 int BLASFUNC(zsymm3m)(char *, char *, int *, int *, double *, double *, int *,
    479 	   double *, int *, double *, double *, int *);
    480 int BLASFUNC(xsymm3m)(char *, char *, int *, int *, double *, double *, int *,
    481 	   double *, int *, double *, double *, int *);
    482 
    483 int BLASFUNC(ssyrk)(char *, char *, int *, int *, float  *, float  *, int *,
    484 	   float  *, float  *, int *);
    485 int BLASFUNC(dsyrk)(char *, char *, int *, int *, double *, double *, int *,
    486 	   double *, double *, int *);
    487 int BLASFUNC(qsyrk)(char *, char *, int *, int *, double *, double *, int *,
    488 	   double *, double *, int *);
    489 int BLASFUNC(csyrk)(char *, char *, int *, int *, float  *, float  *, int *,
    490 	   float  *, float  *, int *);
    491 int BLASFUNC(zsyrk)(char *, char *, int *, int *, double *, double *, int *,
    492 	   double *, double *, int *);
    493 int BLASFUNC(xsyrk)(char *, char *, int *, int *, double *, double *, int *,
    494 	   double *, double *, int *);
    495 
    496 int BLASFUNC(ssyr2k)(char *, char *, int *, int *, float  *, float  *, int *,
    497 	   float *, int *, float  *, float  *, int *);
    498 int BLASFUNC(dsyr2k)(char *, char *, int *, int *, double *, double *, int *,
    499 	   double*, int *, double *, double *, int *);
    500 int BLASFUNC(qsyr2k)(char *, char *, int *, int *, double *, double *, int *,
    501 	   double*, int *, double *, double *, int *);
    502 int BLASFUNC(csyr2k)(char *, char *, int *, int *, float  *, float  *, int *,
    503 	   float *, int *, float  *, float  *, int *);
    504 int BLASFUNC(zsyr2k)(char *, char *, int *, int *, double *, double *, int *,
    505 	   double*, int *, double *, double *, int *);
    506 int BLASFUNC(xsyr2k)(char *, char *, int *, int *, double *, double *, int *,
    507 	   double*, int *, double *, double *, int *);
    508 
    509 int BLASFUNC(chemm)(char *, char *, int *, int *, float  *, float  *, int *,
    510 	   float  *, int *, float  *, float  *, int *);
    511 int BLASFUNC(zhemm)(char *, char *, int *, int *, double *, double *, int *,
    512 	   double *, int *, double *, double *, int *);
    513 int BLASFUNC(xhemm)(char *, char *, int *, int *, double *, double *, int *,
    514 	   double *, int *, double *, double *, int *);
    515 
    516 int BLASFUNC(chemm3m)(char *, char *, int *, int *, float  *, float  *, int *,
    517 	   float  *, int *, float  *, float  *, int *);
    518 int BLASFUNC(zhemm3m)(char *, char *, int *, int *, double *, double *, int *,
    519 	   double *, int *, double *, double *, int *);
    520 int BLASFUNC(xhemm3m)(char *, char *, int *, int *, double *, double *, int *,
    521 	   double *, int *, double *, double *, int *);
    522 
    523 int BLASFUNC(cherk)(char *, char *, int *, int *, float  *, float  *, int *,
    524 	   float  *, float  *, int *);
    525 int BLASFUNC(zherk)(char *, char *, int *, int *, double *, double *, int *,
    526 	   double *, double *, int *);
    527 int BLASFUNC(xherk)(char *, char *, int *, int *, double *, double *, int *,
    528 	   double *, double *, int *);
    529 
    530 int BLASFUNC(cher2k)(char *, char *, int *, int *, float  *, float  *, int *,
    531 	   float *, int *, float  *, float  *, int *);
    532 int BLASFUNC(zher2k)(char *, char *, int *, int *, double *, double *, int *,
    533 	   double*, int *, double *, double *, int *);
    534 int BLASFUNC(xher2k)(char *, char *, int *, int *, double *, double *, int *,
    535 	   double*, int *, double *, double *, int *);
    536 int BLASFUNC(cher2m)(char *, char *, char *, int *, int *, float  *, float  *, int *,
    537 	   float *, int *, float  *, float  *, int *);
    538 int BLASFUNC(zher2m)(char *, char *, char *, int *, int *, double *, double *, int *,
    539 	   double*, int *, double *, double *, int *);
    540 int BLASFUNC(xher2m)(char *, char *, char *, int *, int *, double *, double *, int *,
    541 	   double*, int *, double *, double *, int *);
    542 
    543 int BLASFUNC(sgemt)(char *, int *, int *, float  *, float  *, int *,
    544 		    float  *, int *);
    545 int BLASFUNC(dgemt)(char *, int *, int *, double *, double *, int *,
    546 		    double *, int *);
    547 int BLASFUNC(cgemt)(char *, int *, int *, float  *, float  *, int *,
    548 		    float  *, int *);
    549 int BLASFUNC(zgemt)(char *, int *, int *, double *, double *, int *,
    550 		    double *, int *);
    551 
    552 int BLASFUNC(sgema)(char *, char *, int *, int *, float  *,
    553 		    float  *, int *, float *, float  *, int *, float *, int *);
    554 int BLASFUNC(dgema)(char *, char *, int *, int *, double *,
    555 		    double *, int *, double*, double *, int *, double*, int *);
    556 int BLASFUNC(cgema)(char *, char *, int *, int *, float  *,
    557 		    float  *, int *, float *, float  *, int *, float *, int *);
    558 int BLASFUNC(zgema)(char *, char *, int *, int *, double *,
    559 		    double *, int *, double*, double *, int *, double*, int *);
    560 
    561 int BLASFUNC(sgems)(char *, char *, int *, int *, float  *,
    562 		    float  *, int *, float *, float  *, int *, float *, int *);
    563 int BLASFUNC(dgems)(char *, char *, int *, int *, double *,
    564 		    double *, int *, double*, double *, int *, double*, int *);
    565 int BLASFUNC(cgems)(char *, char *, int *, int *, float  *,
    566 		    float  *, int *, float *, float  *, int *, float *, int *);
    567 int BLASFUNC(zgems)(char *, char *, int *, int *, double *,
    568 		    double *, int *, double*, double *, int *, double*, int *);
    569 
    570 int BLASFUNC(sgetf2)(int *, int *, float  *, int *, int *, int *);
    571 int BLASFUNC(dgetf2)(int *, int *, double *, int *, int *, int *);
    572 int BLASFUNC(qgetf2)(int *, int *, double *, int *, int *, int *);
    573 int BLASFUNC(cgetf2)(int *, int *, float  *, int *, int *, int *);
    574 int BLASFUNC(zgetf2)(int *, int *, double *, int *, int *, int *);
    575 int BLASFUNC(xgetf2)(int *, int *, double *, int *, int *, int *);
    576 
    577 int BLASFUNC(sgetrf)(int *, int *, float  *, int *, int *, int *);
    578 int BLASFUNC(dgetrf)(int *, int *, double *, int *, int *, int *);
    579 int BLASFUNC(qgetrf)(int *, int *, double *, int *, int *, int *);
    580 int BLASFUNC(cgetrf)(int *, int *, float  *, int *, int *, int *);
    581 int BLASFUNC(zgetrf)(int *, int *, double *, int *, int *, int *);
    582 int BLASFUNC(xgetrf)(int *, int *, double *, int *, int *, int *);
    583 
    584 int BLASFUNC(slaswp)(int *, float  *, int *, int *, int *, int *, int *);
    585 int BLASFUNC(dlaswp)(int *, double *, int *, int *, int *, int *, int *);
    586 int BLASFUNC(qlaswp)(int *, double *, int *, int *, int *, int *, int *);
    587 int BLASFUNC(claswp)(int *, float  *, int *, int *, int *, int *, int *);
    588 int BLASFUNC(zlaswp)(int *, double *, int *, int *, int *, int *, int *);
    589 int BLASFUNC(xlaswp)(int *, double *, int *, int *, int *, int *, int *);
    590 
    591 int BLASFUNC(sgetrs)(char *, int *, int *, float  *, int *, int *, float  *, int *, int *);
    592 int BLASFUNC(dgetrs)(char *, int *, int *, double *, int *, int *, double *, int *, int *);
    593 int BLASFUNC(qgetrs)(char *, int *, int *, double *, int *, int *, double *, int *, int *);
    594 int BLASFUNC(cgetrs)(char *, int *, int *, float  *, int *, int *, float  *, int *, int *);
    595 int BLASFUNC(zgetrs)(char *, int *, int *, double *, int *, int *, double *, int *, int *);
    596 int BLASFUNC(xgetrs)(char *, int *, int *, double *, int *, int *, double *, int *, int *);
    597 
    598 int BLASFUNC(sgesv)(int *, int *, float  *, int *, int *, float *, int *, int *);
    599 int BLASFUNC(dgesv)(int *, int *, double *, int *, int *, double*, int *, int *);
    600 int BLASFUNC(qgesv)(int *, int *, double *, int *, int *, double*, int *, int *);
    601 int BLASFUNC(cgesv)(int *, int *, float  *, int *, int *, float *, int *, int *);
    602 int BLASFUNC(zgesv)(int *, int *, double *, int *, int *, double*, int *, int *);
    603 int BLASFUNC(xgesv)(int *, int *, double *, int *, int *, double*, int *, int *);
    604 
    605 int BLASFUNC(spotf2)(char *, int *, float  *, int *, int *);
    606 int BLASFUNC(dpotf2)(char *, int *, double *, int *, int *);
    607 int BLASFUNC(qpotf2)(char *, int *, double *, int *, int *);
    608 int BLASFUNC(cpotf2)(char *, int *, float  *, int *, int *);
    609 int BLASFUNC(zpotf2)(char *, int *, double *, int *, int *);
    610 int BLASFUNC(xpotf2)(char *, int *, double *, int *, int *);
    611 
    612 int BLASFUNC(spotrf)(char *, int *, float  *, int *, int *);
    613 int BLASFUNC(dpotrf)(char *, int *, double *, int *, int *);
    614 int BLASFUNC(qpotrf)(char *, int *, double *, int *, int *);
    615 int BLASFUNC(cpotrf)(char *, int *, float  *, int *, int *);
    616 int BLASFUNC(zpotrf)(char *, int *, double *, int *, int *);
    617 int BLASFUNC(xpotrf)(char *, int *, double *, int *, int *);
    618 
    619 int BLASFUNC(slauu2)(char *, int *, float  *, int *, int *);
    620 int BLASFUNC(dlauu2)(char *, int *, double *, int *, int *);
    621 int BLASFUNC(qlauu2)(char *, int *, double *, int *, int *);
    622 int BLASFUNC(clauu2)(char *, int *, float  *, int *, int *);
    623 int BLASFUNC(zlauu2)(char *, int *, double *, int *, int *);
    624 int BLASFUNC(xlauu2)(char *, int *, double *, int *, int *);
    625 
    626 int BLASFUNC(slauum)(char *, int *, float  *, int *, int *);
    627 int BLASFUNC(dlauum)(char *, int *, double *, int *, int *);
    628 int BLASFUNC(qlauum)(char *, int *, double *, int *, int *);
    629 int BLASFUNC(clauum)(char *, int *, float  *, int *, int *);
    630 int BLASFUNC(zlauum)(char *, int *, double *, int *, int *);
    631 int BLASFUNC(xlauum)(char *, int *, double *, int *, int *);
    632 
    633 int BLASFUNC(strti2)(char *, char *, int *, float  *, int *, int *);
    634 int BLASFUNC(dtrti2)(char *, char *, int *, double *, int *, int *);
    635 int BLASFUNC(qtrti2)(char *, char *, int *, double *, int *, int *);
    636 int BLASFUNC(ctrti2)(char *, char *, int *, float  *, int *, int *);
    637 int BLASFUNC(ztrti2)(char *, char *, int *, double *, int *, int *);
    638 int BLASFUNC(xtrti2)(char *, char *, int *, double *, int *, int *);
    639 
    640 int BLASFUNC(strtri)(char *, char *, int *, float  *, int *, int *);
    641 int BLASFUNC(dtrtri)(char *, char *, int *, double *, int *, int *);
    642 int BLASFUNC(qtrtri)(char *, char *, int *, double *, int *, int *);
    643 int BLASFUNC(ctrtri)(char *, char *, int *, float  *, int *, int *);
    644 int BLASFUNC(ztrtri)(char *, char *, int *, double *, int *, int *);
    645 int BLASFUNC(xtrtri)(char *, char *, int *, double *, int *, int *);
    646 
    647 int BLASFUNC(spotri)(char *, int *, float  *, int *, int *);
    648 int BLASFUNC(dpotri)(char *, int *, double *, int *, int *);
    649 int BLASFUNC(qpotri)(char *, int *, double *, int *, int *);
    650 int BLASFUNC(cpotri)(char *, int *, float  *, int *, int *);
    651 int BLASFUNC(zpotri)(char *, int *, double *, int *, int *);
    652 int BLASFUNC(xpotri)(char *, int *, double *, int *, int *);
    653 
    654 #ifdef __cplusplus
    655 }
    656 #endif
    657 
    658 #endif
    659