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