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) (const int *, const float  *, const float  *, const int *, float  *, const int *);
     34 int    BLASFUNC(daxpy) (const int *, const double *, const double *, const int *, double *, const int *);
     35 int    BLASFUNC(qaxpy) (const int *, const double *, const double *, const int *, double *, const int *);
     36 int    BLASFUNC(caxpy) (const int *, const float  *, const float  *, const int *, float  *, const int *);
     37 int    BLASFUNC(zaxpy) (const int *, const double *, const double *, const int *, double *, const int *);
     38 int    BLASFUNC(xaxpy) (const int *, const double *, const double *, const int *, double *, const int *);
     39 int    BLASFUNC(caxpyc)(const int *, const float  *, const float  *, const int *, float  *, const int *);
     40 int    BLASFUNC(zaxpyc)(const int *, const double *, const double *, const int *, double *, const int *);
     41 int    BLASFUNC(xaxpyc)(const int *, const double *, const double *, const int *, double *, const 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)(const char *, const int *, const int *, const float  *, const float  *, const int *, const float  *, const int *, const float  *, float  *, const int *);
    181 int BLASFUNC(dgemv)(const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    182 int BLASFUNC(qgemv)(const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    183 int BLASFUNC(cgemv)(const char *, const int *, const int *, const float  *, const float  *, const int *, const float  *, const int *, const float  *, float  *, const int *);
    184 int BLASFUNC(zgemv)(const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    185 int BLASFUNC(xgemv)(const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    186 
    187 int BLASFUNC(strsv) (const char *, const char *, const char *, const int *, const float  *, const int *, float  *, const int *);
    188 int BLASFUNC(dtrsv) (const char *, const char *, const char *, const int *, const double *, const int *, double *, const int *);
    189 int BLASFUNC(qtrsv) (const char *, const char *, const char *, const int *, const double *, const int *, double *, const int *);
    190 int BLASFUNC(ctrsv) (const char *, const char *, const char *, const int *, const float  *, const int *, float  *, const int *);
    191 int BLASFUNC(ztrsv) (const char *, const char *, const char *, const int *, const double *, const int *, double *, const int *);
    192 int BLASFUNC(xtrsv) (const char *, const char *, const char *, const int *, const double *, const int *, double *, const int *);
    193 
    194 int BLASFUNC(stpsv) (char *, char *, char *, int *, float  *, float  *, int *);
    195 int BLASFUNC(dtpsv) (char *, char *, char *, int *, double *, double *, int *);
    196 int BLASFUNC(qtpsv) (char *, char *, char *, int *, double *, double *, int *);
    197 int BLASFUNC(ctpsv) (char *, char *, char *, int *, float  *, float  *, int *);
    198 int BLASFUNC(ztpsv) (char *, char *, char *, int *, double *, double *, int *);
    199 int BLASFUNC(xtpsv) (char *, char *, char *, int *, double *, double *, int *);
    200 
    201 int BLASFUNC(strmv) (const char *, const char *, const char *, const int *, const float  *, const int *, float  *, const int *);
    202 int BLASFUNC(dtrmv) (const char *, const char *, const char *, const int *, const double *, const int *, double *, const int *);
    203 int BLASFUNC(qtrmv) (const char *, const char *, const char *, const int *, const double *, const int *, double *, const int *);
    204 int BLASFUNC(ctrmv) (const char *, const char *, const char *, const int *, const float  *, const int *, float  *, const int *);
    205 int BLASFUNC(ztrmv) (const char *, const char *, const char *, const int *, const double *, const int *, double *, const int *);
    206 int BLASFUNC(xtrmv) (const char *, const char *, const char *, const int *, const double *, const int *, double *, const int *);
    207 
    208 int BLASFUNC(stpmv) (char *, char *, char *, int *, float  *, float  *, int *);
    209 int BLASFUNC(dtpmv) (char *, char *, char *, int *, double *, double *, int *);
    210 int BLASFUNC(qtpmv) (char *, char *, char *, int *, double *, double *, int *);
    211 int BLASFUNC(ctpmv) (char *, char *, char *, int *, float  *, float  *, int *);
    212 int BLASFUNC(ztpmv) (char *, char *, char *, int *, double *, double *, int *);
    213 int BLASFUNC(xtpmv) (char *, char *, char *, int *, double *, double *, int *);
    214 
    215 int BLASFUNC(stbmv) (char *, char *, char *, int *, int *, float  *, int *, float  *, int *);
    216 int BLASFUNC(dtbmv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    217 int BLASFUNC(qtbmv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    218 int BLASFUNC(ctbmv) (char *, char *, char *, int *, int *, float  *, int *, float  *, int *);
    219 int BLASFUNC(ztbmv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    220 int BLASFUNC(xtbmv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    221 
    222 int BLASFUNC(stbsv) (char *, char *, char *, int *, int *, float  *, int *, float  *, int *);
    223 int BLASFUNC(dtbsv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    224 int BLASFUNC(qtbsv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    225 int BLASFUNC(ctbsv) (char *, char *, char *, int *, int *, float  *, int *, float  *, int *);
    226 int BLASFUNC(ztbsv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    227 int BLASFUNC(xtbsv) (char *, char *, char *, int *, int *, double *, int *, double *, int *);
    228 
    229 int BLASFUNC(ssymv) (const char *, const int *, const float  *, const float  *, const int *, const float  *, const int *, const float  *, float  *, const int *);
    230 int BLASFUNC(dsymv) (const char *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    231 int BLASFUNC(qsymv) (const char *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    232 
    233 int BLASFUNC(sspmv) (char *, int *, float  *, float *,
    234 		     float  *, int *, float *, float *, int *);
    235 int BLASFUNC(dspmv) (char *, int *, double  *, double *,
    236 		     double  *, int *, double *, double *, int *);
    237 int BLASFUNC(qspmv) (char *, int *, double  *, double *,
    238 		     double  *, int *, double *, double *, int *);
    239 
    240 int BLASFUNC(ssyr) (const char *, const int *, const float   *, const float  *, const int *, float  *, const int *);
    241 int BLASFUNC(dsyr) (const char *, const int *, const double  *, const double *, const int *, double *, const int *);
    242 int BLASFUNC(qsyr) (const char *, const int *, const double  *, const double *, const int *, double *, const int *);
    243 
    244 int BLASFUNC(ssyr2) (const char *, const int *, const float   *, const float  *, const int *, const float  *, const int *, float  *, const int *);
    245 int BLASFUNC(dsyr2) (const char *, const int *, const double  *, const double *, const int *, const double *, const int *, double *, const int *);
    246 int BLASFUNC(qsyr2) (const char *, const int *, const double  *, const double *, const int *, const double *, const int *, double *, const int *);
    247 int BLASFUNC(csyr2) (const char *, const int *, const float   *, const float  *, const int *, const float  *, const int *, float  *, const int *);
    248 int BLASFUNC(zsyr2) (const char *, const int *, const double  *, const double *, const int *, const double *, const int *, double *, const int *);
    249 int BLASFUNC(xsyr2) (const char *, const int *, const double  *, const double *, const int *, const double *, const int *, double *, const int *);
    250 
    251 int BLASFUNC(sspr) (char *, int *, float   *, float  *, int *,
    252 		    float  *);
    253 int BLASFUNC(dspr) (char *, int *, double  *, double *, int *,
    254 		    double *);
    255 int BLASFUNC(qspr) (char *, int *, double  *, double *, int *,
    256 		    double *);
    257 
    258 int BLASFUNC(sspr2) (char *, int *, float   *,
    259 		     float  *, int *, float  *, int *, float  *);
    260 int BLASFUNC(dspr2) (char *, int *, double  *,
    261 		     double *, int *, double *, int *, double *);
    262 int BLASFUNC(qspr2) (char *, int *, double  *,
    263 		     double *, int *, double *, int *, double *);
    264 int BLASFUNC(cspr2) (char *, int *, float   *,
    265 		     float  *, int *, float  *, int *, float  *);
    266 int BLASFUNC(zspr2) (char *, int *, double  *,
    267 		     double *, int *, double *, int *, double *);
    268 int BLASFUNC(xspr2) (char *, int *, double  *,
    269 		     double *, int *, double *, int *, double *);
    270 
    271 int BLASFUNC(cher) (char *, int *, float   *, float  *, int *,
    272 		    float  *, int *);
    273 int BLASFUNC(zher) (char *, int *, double  *, double *, int *,
    274 		    double *, int *);
    275 int BLASFUNC(xher) (char *, int *, double  *, double *, int *,
    276 		    double *, int *);
    277 
    278 int BLASFUNC(chpr) (char *, int *, float   *, float  *, int *, float  *);
    279 int BLASFUNC(zhpr) (char *, int *, double  *, double *, int *, double *);
    280 int BLASFUNC(xhpr) (char *, int *, double  *, double *, int *, double *);
    281 
    282 int BLASFUNC(cher2) (char *, int *, float   *,
    283 		     float  *, int *, float  *, int *, float  *, int *);
    284 int BLASFUNC(zher2) (char *, int *, double  *,
    285 		     double *, int *, double *, int *, double *, int *);
    286 int BLASFUNC(xher2) (char *, int *, double  *,
    287 		     double *, int *, double *, int *, double *, int *);
    288 
    289 int BLASFUNC(chpr2) (char *, int *, float   *,
    290 		     float  *, int *, float  *, int *, float  *);
    291 int BLASFUNC(zhpr2) (char *, int *, double  *,
    292 		     double *, int *, double *, int *, double *);
    293 int BLASFUNC(xhpr2) (char *, int *, double  *,
    294 		     double *, int *, double *, int *, double *);
    295 
    296 int BLASFUNC(chemv) (const char *, const int *, const float  *, const float  *, const int *, const float  *, const int *, const float  *, float  *, const int *);
    297 int BLASFUNC(zhemv) (const char *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    298 int BLASFUNC(xhemv) (const char *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    299 
    300 int BLASFUNC(chpmv) (char *, int *, float  *, float *,
    301 		     float  *, int *, float *, float *, int *);
    302 int BLASFUNC(zhpmv) (char *, int *, double  *, double *,
    303 		     double  *, int *, double *, double *, int *);
    304 int BLASFUNC(xhpmv) (char *, int *, double  *, double *,
    305 		     double  *, int *, double *, double *, int *);
    306 
    307 int BLASFUNC(snorm)(char *, int *, int *, float  *, int *);
    308 int BLASFUNC(dnorm)(char *, int *, int *, double *, int *);
    309 int BLASFUNC(cnorm)(char *, int *, int *, float  *, int *);
    310 int BLASFUNC(znorm)(char *, int *, int *, double *, int *);
    311 
    312 int BLASFUNC(sgbmv)(char *, int *, int *, int *, int *, float  *, float  *, int *,
    313 		    float  *, int *, float  *, float  *, int *);
    314 int BLASFUNC(dgbmv)(char *, int *, int *, int *, int *, double *, double *, int *,
    315 		    double *, int *, double *, double *, int *);
    316 int BLASFUNC(qgbmv)(char *, int *, int *, int *, int *, double *, double *, int *,
    317 		    double *, int *, double *, double *, int *);
    318 int BLASFUNC(cgbmv)(char *, int *, int *, int *, int *, float  *, float  *, int *,
    319 		    float  *, int *, float  *, float  *, int *);
    320 int BLASFUNC(zgbmv)(char *, int *, int *, int *, int *, double *, double *, int *,
    321 		    double *, int *, double *, double *, int *);
    322 int BLASFUNC(xgbmv)(char *, int *, int *, int *, int *, double *, double *, int *,
    323 		    double *, int *, double *, double *, int *);
    324 
    325 int BLASFUNC(ssbmv)(char *, int *, int *, float  *, float  *, int *,
    326 		    float  *, int *, float  *, float  *, int *);
    327 int BLASFUNC(dsbmv)(char *, int *, int *, double *, double *, int *,
    328 		    double *, int *, double *, double *, int *);
    329 int BLASFUNC(qsbmv)(char *, int *, int *, double *, double *, int *,
    330 		    double *, int *, double *, double *, int *);
    331 int BLASFUNC(csbmv)(char *, int *, int *, float  *, float  *, int *,
    332 		    float  *, int *, float  *, float  *, int *);
    333 int BLASFUNC(zsbmv)(char *, int *, int *, double *, double *, int *,
    334 		    double *, int *, double *, double *, int *);
    335 int BLASFUNC(xsbmv)(char *, int *, int *, double *, double *, int *,
    336 		    double *, int *, double *, double *, int *);
    337 
    338 int BLASFUNC(chbmv)(char *, int *, int *, float  *, float  *, int *,
    339 		    float  *, int *, float  *, float  *, int *);
    340 int BLASFUNC(zhbmv)(char *, int *, int *, double *, double *, int *,
    341 		    double *, int *, double *, double *, int *);
    342 int BLASFUNC(xhbmv)(char *, int *, int *, double *, double *, int *,
    343 		    double *, int *, double *, double *, int *);
    344 
    345 /* Level 3 routines */
    346 
    347 int BLASFUNC(sgemm)(const char *, const char *, const int *, const int *, const int *, const float  *, const float  *, const int *, const float  *, const int *, const float  *, float  *, const int *);
    348 int BLASFUNC(dgemm)(const char *, const char *, const int *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    349 int BLASFUNC(qgemm)(const char *, const char *, const int *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    350 int BLASFUNC(cgemm)(const char *, const char *, const int *, const int *, const int *, const float  *, const float  *, const int *, const float  *, const int *, const float  *, float  *, const int *);
    351 int BLASFUNC(zgemm)(const char *, const char *, const int *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    352 int BLASFUNC(xgemm)(const char *, const char *, const int *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    353 
    354 int BLASFUNC(cgemm3m)(char *, char *, int *, int *, int *, float *,
    355 	   float  *, int *, float  *, int *, float  *, float  *, int *);
    356 int BLASFUNC(zgemm3m)(char *, char *, int *, int *, int *, double *,
    357 	   double *, int *, double *, int *, double *, double *, int *);
    358 int BLASFUNC(xgemm3m)(char *, char *, int *, int *, int *, double *,
    359 	   double *, int *, double *, int *, double *, double *, int *);
    360 
    361 int BLASFUNC(sge2mm)(char *, char *, char *, int *, int *,
    362 		     float *, float  *, int *, float  *, int *,
    363 		     float *, float  *, int *);
    364 int BLASFUNC(dge2mm)(char *, char *, char *, int *, int *,
    365 		     double *, double  *, int *, double  *, int *,
    366 		     double *, double  *, int *);
    367 int BLASFUNC(cge2mm)(char *, char *, char *, int *, int *,
    368 		     float *, float  *, int *, float  *, int *,
    369 		     float *, float  *, int *);
    370 int BLASFUNC(zge2mm)(char *, char *, char *, int *, int *,
    371 		     double *, double  *, int *, double  *, int *,
    372 		     double *, double  *, int *);
    373 
    374 int BLASFUNC(strsm)(const char *, const char *, const char *, const char *, const int *, const int *, const float *,  const float *,  const int *, float *,  const int *);
    375 int BLASFUNC(dtrsm)(const char *, const char *, const char *, const char *, const int *, const int *, const double *, const double *, const int *, double *, const int *);
    376 int BLASFUNC(qtrsm)(const char *, const char *, const char *, const char *, const int *, const int *, const double *, const double *, const int *, double *, const int *);
    377 int BLASFUNC(ctrsm)(const char *, const char *, const char *, const char *, const int *, const int *, const float *,  const float *,  const int *, float *,  const int *);
    378 int BLASFUNC(ztrsm)(const char *, const char *, const char *, const char *, const int *, const int *, const double *, const double *, const int *, double *, const int *);
    379 int BLASFUNC(xtrsm)(const char *, const char *, const char *, const char *, const int *, const int *, const double *, const double *, const int *, double *, const int *);
    380 
    381 int BLASFUNC(strmm)(const char *, const char *, const char *, const char *, const int *, const int *, const float *,  const float *,  const int *, float *,  const int *);
    382 int BLASFUNC(dtrmm)(const char *, const char *, const char *, const char *, const int *, const int *, const double *, const double *, const int *, double *, const int *);
    383 int BLASFUNC(qtrmm)(const char *, const char *, const char *, const char *, const int *, const int *, const double *, const double *, const int *, double *, const int *);
    384 int BLASFUNC(ctrmm)(const char *, const char *, const char *, const char *, const int *, const int *, const float *,  const float *,  const int *, float *,  const int *);
    385 int BLASFUNC(ztrmm)(const char *, const char *, const char *, const char *, const int *, const int *, const double *, const double *, const int *, double *, const int *);
    386 int BLASFUNC(xtrmm)(const char *, const char *, const char *, const char *, const int *, const int *, const double *, const double *, const int *, double *, const int *);
    387 
    388 int BLASFUNC(ssymm)(const char *, const char *, const int *, const int *, const float  *, const float  *, const int *, const float  *, const int *, const float  *, float  *, const int *);
    389 int BLASFUNC(dsymm)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    390 int BLASFUNC(qsymm)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    391 int BLASFUNC(csymm)(const char *, const char *, const int *, const int *, const float  *, const float  *, const int *, const float  *, const int *, const float  *, float  *, const int *);
    392 int BLASFUNC(zsymm)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    393 int BLASFUNC(xsymm)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    394 
    395 int BLASFUNC(csymm3m)(char *, char *, int *, int *, float  *, float  *, int *, float  *, int *, float  *, float  *, int *);
    396 int BLASFUNC(zsymm3m)(char *, char *, int *, int *, double *, double *, int *, double *, int *, double *, double *, int *);
    397 int BLASFUNC(xsymm3m)(char *, char *, int *, int *, double *, double *, int *, double *, int *, double *, double *, int *);
    398 
    399 int BLASFUNC(ssyrk)(const char *, const char *, const int *, const int *, const float  *, const float  *, const int *, const float  *, float  *, const int *);
    400 int BLASFUNC(dsyrk)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, double *, const int *);
    401 int BLASFUNC(qsyrk)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, double *, const int *);
    402 int BLASFUNC(csyrk)(const char *, const char *, const int *, const int *, const float  *, const float  *, const int *, const float  *, float  *, const int *);
    403 int BLASFUNC(zsyrk)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, double *, const int *);
    404 int BLASFUNC(xsyrk)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, double *, const int *);
    405 
    406 int BLASFUNC(ssyr2k)(const char *, const char *, const int *, const int *, const float  *, const float  *, const int *, const float *, const int *, const float  *, float  *, const int *);
    407 int BLASFUNC(dsyr2k)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double*, const int *, const double *, double *, const int *);
    408 int BLASFUNC(qsyr2k)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double*, const int *, const double *, double *, const int *);
    409 int BLASFUNC(csyr2k)(const char *, const char *, const int *, const int *, const float  *, const float  *, const int *, const float *, const int *, const float  *, float  *, const int *);
    410 int BLASFUNC(zsyr2k)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double*, const int *, const double *, double *, const int *);
    411 int BLASFUNC(xsyr2k)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double*, const int *, const double *, double *, const int *);
    412 
    413 int BLASFUNC(chemm)(const char *, const char *, const int *, const int *, const float  *, const float  *, const int *, const float  *, const int *, const float  *, float  *, const int *);
    414 int BLASFUNC(zhemm)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    415 int BLASFUNC(xhemm)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    416 
    417 int BLASFUNC(chemm3m)(char *, char *, int *, int *, float  *, float  *, int *,
    418 	   float  *, int *, float  *, float  *, int *);
    419 int BLASFUNC(zhemm3m)(char *, char *, int *, int *, double *, double *, int *,
    420 	   double *, int *, double *, double *, int *);
    421 int BLASFUNC(xhemm3m)(char *, char *, int *, int *, double *, double *, int *,
    422 	   double *, int *, double *, double *, int *);
    423 
    424 int BLASFUNC(cherk)(const char *, const char *, const int *, const int *, const float  *, const float  *, const int *, const float  *, float  *, const int *);
    425 int BLASFUNC(zherk)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, double *, const int *);
    426 int BLASFUNC(xherk)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, double *, const int *);
    427 
    428 int BLASFUNC(cher2k)(const char *, const char *, const int *, const int *, const float  *, const float  *, const int *, const float  *, const int *, const float  *, float  *, const int *);
    429 int BLASFUNC(zher2k)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    430 int BLASFUNC(xher2k)(const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double *, const int *, const double *, double *, const int *);
    431 int BLASFUNC(cher2m)(const char *, const char *, const char *, const int *, const int *, const float  *, const float  *, const int *, const float *, const int *, const float  *, float  *, const int *);
    432 int BLASFUNC(zher2m)(const char *, const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double*, const int *, const double *, double *, const int *);
    433 int BLASFUNC(xher2m)(const char *, const char *, const char *, const int *, const int *, const double *, const double *, const int *, const double*, const int *, const double *, double *, const int *);
    434 
    435 
    436 #ifdef __cplusplus
    437 }
    438 #endif
    439 
    440 #endif
    441