Statistiques
| Révision :

root / BLAS / xGEMM / fortran_common.h.orig @ 177

Historique | Voir | Annoter | Télécharger (17,44 ko)

1 1 equemene
/*
2 7 equemene
 * Copyright 1993-2012 NVIDIA Corporation.  All rights reserved.
3 1 equemene
 *
4 1 equemene
 * NOTICE TO LICENSEE:
5 1 equemene
 *
6 1 equemene
 * This source code and/or documentation ("Licensed Deliverables") are
7 1 equemene
 * subject to NVIDIA intellectual property rights under U.S. and
8 1 equemene
 * international Copyright laws.
9 1 equemene
 *
10 1 equemene
 * These Licensed Deliverables contained herein is PROPRIETARY and
11 1 equemene
 * CONFIDENTIAL to NVIDIA and is being provided under the terms and
12 1 equemene
 * conditions of a form of NVIDIA software license agreement by and
13 1 equemene
 * between NVIDIA and Licensee ("License Agreement") or electronically
14 1 equemene
 * accepted by Licensee.  Notwithstanding any terms or conditions to
15 1 equemene
 * the contrary in the License Agreement, reproduction or disclosure
16 1 equemene
 * of the Licensed Deliverables to any third party without the express
17 1 equemene
 * written consent of NVIDIA is prohibited.
18 1 equemene
 *
19 1 equemene
 * NOTWITHSTANDING ANY TERMS OR CONDITIONS TO THE CONTRARY IN THE
20 1 equemene
 * LICENSE AGREEMENT, NVIDIA MAKES NO REPRESENTATION ABOUT THE
21 1 equemene
 * SUITABILITY OF THESE LICENSED DELIVERABLES FOR ANY PURPOSE.  IT IS
22 1 equemene
 * PROVIDED "AS IS" WITHOUT EXPRESS OR IMPLIED WARRANTY OF ANY KIND.
23 1 equemene
 * NVIDIA DISCLAIMS ALL WARRANTIES WITH REGARD TO THESE LICENSED
24 1 equemene
 * DELIVERABLES, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY,
25 1 equemene
 * NONINFRINGEMENT, AND FITNESS FOR A PARTICULAR PURPOSE.
26 1 equemene
 * NOTWITHSTANDING ANY TERMS OR CONDITIONS TO THE CONTRARY IN THE
27 1 equemene
 * LICENSE AGREEMENT, IN NO EVENT SHALL NVIDIA BE LIABLE FOR ANY
28 1 equemene
 * SPECIAL, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL DAMAGES, OR ANY
29 1 equemene
 * DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
30 1 equemene
 * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
31 1 equemene
 * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE
32 1 equemene
 * OF THESE LICENSED DELIVERABLES.
33 1 equemene
 *
34 1 equemene
 * U.S. Government End Users.  These Licensed Deliverables are a
35 1 equemene
 * "commercial item" as that term is defined at 48 C.F.R. 2.101 (OCT
36 1 equemene
 * 1995), consisting of "commercial computer software" and "commercial
37 1 equemene
 * computer software documentation" as such terms are used in 48
38 1 equemene
 * C.F.R. 12.212 (SEPT 1995) and is provided to the U.S. Government
39 1 equemene
 * only as a commercial end item.  Consistent with 48 C.F.R.12.212 and
40 1 equemene
 * 48 C.F.R. 227.7202-1 through 227.7202-4 (JUNE 1995), all
41 1 equemene
 * U.S. Government End Users acquire the Licensed Deliverables with
42 1 equemene
 * only those rights set forth herein.
43 1 equemene
 *
44 1 equemene
 * Any use of the Licensed Deliverables in individual and commercial
45 1 equemene
 * software must include, in the user documentation and internal
46 1 equemene
 * comments to the code, the above Disclaimer and U.S. Government End
47 1 equemene
 * Users Notice.
48 1 equemene
 */
49 1 equemene
50 7 equemene
51 7 equemene
52 7 equemene
/* Define CUBLAS_FORTRAN_COMPILER for Windows needed because
53 7 equemene
   tbe compilation is done from the perl script fortran_nightly.pl which
54 7 equemene
   does not include fortran_tools.mk
55 7 equemene
   On Linux and Apple, CFLAGS is setup with fortran_tools.mk
56 7 equemene
*/
57 1 equemene
#if defined(_WIN32)
58 7 equemene
#ifndef CUBLAS_INTEL_FORTRAN
59 7 equemene
#define CUBLAS_INTEL_FORTRAN
60 1 equemene
#endif
61 7 equemene
#endif
62 1 equemene
63 7 equemene
#if defined(CUBLAS_GFORTRAN)
64 7 equemene
/* using option -ff2c make the ABI compatible with F77
65 7 equemene
   No need to define RETURN_COMPLEX, which cause problem
66 7 equemene
   on Gfortran 4.x on 32 bit
67 7 equemene
*/
68 7 equemene
/* #define RETURN_COMPLEX 1 */
69 7 equemene
#endif
70 7 equemene
71 7 equemene
72 7 equemene
#if defined(CUBLAS_GFORTRAN) || defined (CUBLAS_G95)
73 1 equemene
/* NOTE: Must use -fno-second-underscore when building Fortran source with g77
74 1 equemene
 *       g77 invocation may not use -fno-f2c, which forces different return
75 1 equemene
 *       type conventions than the one used below
76 1 equemene
 */
77 1 equemene
#define CUBLAS_INIT             cublas_init_
78 1 equemene
#define CUBLAS_SHUTDOWN         cublas_shutdown_
79 1 equemene
#define CUBLAS_ALLOC            cublas_alloc_
80 1 equemene
#define CUBLAS_FREE             cublas_free_
81 1 equemene
#define CUBLAS_SET_VECTOR       cublas_set_vector_
82 1 equemene
#define CUBLAS_GET_VECTOR       cublas_get_vector_
83 1 equemene
#define CUBLAS_SET_MATRIX       cublas_set_matrix_
84 1 equemene
#define CUBLAS_GET_MATRIX       cublas_get_matrix_
85 1 equemene
#define CUBLAS_GET_ERROR        cublas_get_error_
86 1 equemene
#define CUBLAS_XERBLA           cublas_xerbla_
87 1 equemene
#define CUBLAS_ISAMAX           cublas_isamax_
88 1 equemene
#define CUBLAS_ISAMIN           cublas_isamin_
89 1 equemene
#define CUBLAS_SASUM            cublas_sasum_
90 1 equemene
#define CUBLAS_SAXPY            cublas_saxpy_
91 1 equemene
#define CUBLAS_SCOPY            cublas_scopy_
92 1 equemene
#define CUBLAS_SDOT             cublas_sdot_
93 1 equemene
#define CUBLAS_SNRM2            cublas_snrm2_
94 1 equemene
#define CUBLAS_SROT             cublas_srot_
95 1 equemene
#define CUBLAS_SROTG            cublas_srotg_
96 1 equemene
#define CUBLAS_SROTM            cublas_srotm_
97 1 equemene
#define CUBLAS_SROTMG           cublas_srotmg_
98 1 equemene
#define CUBLAS_SSCAL            cublas_sscal_
99 1 equemene
#define CUBLAS_SSWAP            cublas_sswap_
100 1 equemene
#define CUBLAS_CAXPY            cublas_caxpy_
101 1 equemene
#define CUBLAS_CCOPY            cublas_ccopy_
102 1 equemene
#define CUBLAS_CROT             cublas_crot_
103 1 equemene
#define CUBLAS_CROTG            cublas_crotg_
104 1 equemene
#define CUBLAS_CSCAL            cublas_cscal_
105 1 equemene
#define CUBLAS_CSROT            cublas_csrot_
106 1 equemene
#define CUBLAS_CSSCAL           cublas_csscal_
107 1 equemene
#define CUBLAS_CSWAP            cublas_cswap_
108 1 equemene
#define CUBLAS_CTRMV            cublas_ctrmv_
109 1 equemene
#define CUBLAS_CDOTU            cublas_cdotu_
110 1 equemene
#define CUBLAS_CDOTC            cublas_cdotc_
111 1 equemene
#define CUBLAS_ICAMAX           cublas_icamax_
112 1 equemene
#define CUBLAS_SCASUM           cublas_scasum_
113 1 equemene
#define CUBLAS_SCNRM2           cublas_scnrm2_
114 1 equemene
#define CUBLAS_SGBMV            cublas_sgbmv_
115 1 equemene
#define CUBLAS_SGEMV            cublas_sgemv_
116 1 equemene
#define CUBLAS_SGER             cublas_sger_
117 1 equemene
#define CUBLAS_SSBMV            cublas_ssbmv_
118 1 equemene
#define CUBLAS_SSPMV            cublas_sspmv_
119 1 equemene
#define CUBLAS_SSPR             cublas_sspr_
120 1 equemene
#define CUBLAS_SSPR2            cublas_sspr2_
121 1 equemene
#define CUBLAS_SSYMV            cublas_ssymv_
122 1 equemene
#define CUBLAS_SSYR             cublas_ssyr_
123 1 equemene
#define CUBLAS_SSYR2            cublas_ssyr2_
124 1 equemene
#define CUBLAS_STBMV            cublas_stbmv_
125 1 equemene
#define CUBLAS_STBSV            cublas_stbsv_
126 1 equemene
#define CUBLAS_STPMV            cublas_stpmv_
127 1 equemene
#define CUBLAS_STPSV            cublas_stpsv_
128 1 equemene
#define CUBLAS_STRMV            cublas_strmv_
129 1 equemene
#define CUBLAS_STRSV            cublas_strsv_
130 1 equemene
#define CUBLAS_SGEMM            cublas_sgemm_
131 1 equemene
#define CUBLAS_SSYMM            cublas_ssymm_
132 1 equemene
#define CUBLAS_SSYR2K           cublas_ssyr2k_
133 1 equemene
#define CUBLAS_SSYRK            cublas_ssyrk_
134 1 equemene
#define CUBLAS_STRMM            cublas_strmm_
135 1 equemene
#define CUBLAS_STRSM            cublas_strsm_
136 1 equemene
#define CUBLAS_CGEMM            cublas_cgemm_
137 1 equemene
#define CUBLAS_CHEMM            cublas_chemm_
138 1 equemene
#define CUBLAS_CSYMM            cublas_csymm_
139 1 equemene
#define CUBLAS_CTRMM            cublas_ctrmm_
140 1 equemene
#define CUBLAS_CTRSM            cublas_ctrsm_
141 1 equemene
#define CUBLAS_CHERK            cublas_cherk_
142 1 equemene
#define CUBLAS_CSYRK            cublas_csyrk_
143 1 equemene
#define CUBLAS_CHER2K           cublas_cher2k_
144 1 equemene
#define CUBLAS_CSYR2K           cublas_csyr2k_
145 1 equemene
#define CUBLAS_IDAMAX           cublas_idamax_
146 1 equemene
#define CUBLAS_IDAMIN           cublas_idamin_
147 1 equemene
#define CUBLAS_DASUM            cublas_dasum_
148 1 equemene
#define CUBLAS_DAXPY            cublas_daxpy_
149 1 equemene
#define CUBLAS_DCOPY            cublas_dcopy_
150 1 equemene
#define CUBLAS_DDOT             cublas_ddot_
151 1 equemene
#define CUBLAS_DNRM2            cublas_dnrm2_
152 1 equemene
#define CUBLAS_DROT             cublas_drot_
153 1 equemene
#define CUBLAS_DROTG            cublas_drotg_
154 1 equemene
#define CUBLAS_DROTM            cublas_drotm_
155 1 equemene
#define CUBLAS_DROTMG           cublas_drotmg_
156 1 equemene
#define CUBLAS_DSCAL            cublas_dscal_
157 1 equemene
#define CUBLAS_DSWAP            cublas_dswap_
158 1 equemene
#define CUBLAS_ZAXPY            cublas_zaxpy_
159 1 equemene
#define CUBLAS_ZCOPY            cublas_zcopy_
160 1 equemene
#define CUBLAS_ZROT             cublas_zrot_
161 1 equemene
#define CUBLAS_ZROTG            cublas_zrotg_
162 1 equemene
#define CUBLAS_ZSCAL            cublas_zscal_
163 1 equemene
#define CUBLAS_ZDROT            cublas_zdrot_
164 1 equemene
#define CUBLAS_ZDSCAL           cublas_zdscal_
165 1 equemene
#define CUBLAS_ZSWAP            cublas_zswap_
166 1 equemene
#define CUBLAS_ZDOTU            cublas_zdotu_
167 1 equemene
#define CUBLAS_ZDOTC            cublas_zdotc_
168 1 equemene
#define CUBLAS_IZAMAX           cublas_izamax_
169 1 equemene
#define CUBLAS_DZASUM           cublas_dzasum_
170 1 equemene
#define CUBLAS_DZNRM2           cublas_dznrm2_
171 1 equemene
#define CUBLAS_DGBMV            cublas_dgbmv_
172 1 equemene
#define CUBLAS_DGEMV            cublas_dgemv_
173 1 equemene
#define CUBLAS_ZGEMV            cublas_zgemv_
174 1 equemene
#define CUBLAS_DGER             cublas_dger_
175 1 equemene
#define CUBLAS_DSBMV            cublas_dsbmv_
176 1 equemene
#define CUBLAS_DSPMV            cublas_dspmv_
177 1 equemene
#define CUBLAS_DSPR             cublas_dspr_
178 1 equemene
#define CUBLAS_DSPR2            cublas_dspr2_
179 1 equemene
#define CUBLAS_DSYMV            cublas_dsymv_
180 1 equemene
#define CUBLAS_DSYR             cublas_dsyr_
181 1 equemene
#define CUBLAS_DSYR2            cublas_dsyr2_
182 1 equemene
#define CUBLAS_DTBMV            cublas_dtbmv_
183 1 equemene
#define CUBLAS_DTBSV            cublas_dtbsv_
184 1 equemene
#define CUBLAS_DTPMV            cublas_dtpmv_
185 1 equemene
#define CUBLAS_DTPSV            cublas_dtpsv_
186 1 equemene
#define CUBLAS_DTRMV            cublas_dtrmv_
187 1 equemene
#define CUBLAS_DTRSV            cublas_dtrsv_
188 1 equemene
#define CUBLAS_DGEMM            cublas_dgemm_
189 1 equemene
#define CUBLAS_DSYMM            cublas_dsymm_
190 1 equemene
#define CUBLAS_DSYR2K           cublas_dsyr2k_
191 1 equemene
#define CUBLAS_DSYRK            cublas_dsyrk_
192 1 equemene
#define CUBLAS_ZSYRK            cublas_zsyrk_
193 1 equemene
#define CUBLAS_DTRMM            cublas_dtrmm_
194 1 equemene
#define CUBLAS_DTRSM            cublas_dtrsm_
195 1 equemene
#define CUBLAS_ZGEMM            cublas_zgemm_
196 1 equemene
#define CUBLAS_ZHEMM            cublas_zhemm_
197 1 equemene
#define CUBLAS_ZSYMM            cublas_zsymm_
198 1 equemene
#define CUBLAS_ZTRMM            cublas_ztrmm_
199 1 equemene
#define CUBLAS_ZTRSM            cublas_ztrsm_
200 1 equemene
#define CUBLAS_ZHERK            cublas_zherk_
201 1 equemene
#define CUBLAS_ZSYRK            cublas_zsyrk_
202 1 equemene
#define CUBLAS_ZHER2K           cublas_zher2k_
203 1 equemene
#define CUBLAS_ZSYR2K           cublas_zsyr2k_
204 1 equemene
205 1 equemene
#define  CUBLAS_CGEMV           cublas_cgemv_
206 1 equemene
#define  CUBLAS_CGBMV           cublas_cgbmv_
207 1 equemene
#define  CUBLAS_CHEMV           cublas_chemv_
208 1 equemene
#define  CUBLAS_CHBMV           cublas_chbmv_
209 1 equemene
#define  CUBLAS_CHPMV           cublas_chpmv_
210 1 equemene
#define  CUBLAS_CTBMV           cublas_ctbmv_
211 1 equemene
#define  CUBLAS_CTPMV           cublas_ctpmv_
212 1 equemene
#define  CUBLAS_CTRSV           cublas_ctrsv_
213 1 equemene
#define  CUBLAS_CTBSV           cublas_ctbsv_
214 1 equemene
#define  CUBLAS_CTPSV           cublas_ctpsv_
215 1 equemene
#define  CUBLAS_CGERC           cublas_cgerc_
216 1 equemene
#define  CUBLAS_CGERU           cublas_cgeru_
217 1 equemene
#define  CUBLAS_CHPR            cublas_chpr_
218 1 equemene
#define  CUBLAS_CHPR2           cublas_chpr2_
219 1 equemene
#define  CUBLAS_CHER            cublas_cher_
220 1 equemene
#define  CUBLAS_CHER2           cublas_cher2_
221 1 equemene
222 1 equemene
// stubs for zblat2
223 1 equemene
#define CUBLAS_ZGBMV           cublas_zgbmv_
224 1 equemene
#define CUBLAS_ZHEMV           cublas_zhemv_
225 1 equemene
#define CUBLAS_ZHBMV           cublas_zhbmv_
226 1 equemene
#define CUBLAS_ZHPMV           cublas_zhpmv_
227 1 equemene
#define CUBLAS_ZTRMV           cublas_ztrmv_
228 1 equemene
#define CUBLAS_ZTBMV           cublas_ztbmv_
229 1 equemene
#define CUBLAS_ZTPMV           cublas_ztpmv_
230 1 equemene
#define CUBLAS_ZTRSV           cublas_ztrsv_
231 1 equemene
#define CUBLAS_ZTBSV           cublas_ztbsv_
232 1 equemene
#define CUBLAS_ZTPSV           cublas_ztpsv_
233 1 equemene
#define CUBLAS_ZGERC           cublas_zgerc_
234 1 equemene
#define CUBLAS_ZGERU           cublas_zgeru_
235 1 equemene
#define CUBLAS_ZHER            cublas_zher_
236 1 equemene
#define CUBLAS_ZHPR            cublas_zhpr_
237 1 equemene
#define CUBLAS_ZHER2           cublas_zher2_
238 1 equemene
#define CUBLAS_ZHPR2           cublas_zhpr2_
239 1 equemene
240 7 equemene
#elif defined(CUBLAS_INTEL_FORTRAN)
241 1 equemene
242 1 equemene
#define CUBLAS_INIT             CUBLAS_INIT
243 1 equemene
#define CUBLAS_SHUTDOWN         CUBLAS_SHUTDOWN
244 1 equemene
#define CUBLAS_ALLOC            CUBLAS_ALLOC
245 1 equemene
#define CUBLAS_FREE             CUBLAS_FREE
246 1 equemene
#define CUBLAS_SET_VECTOR       CUBLAS_SET_VECTOR
247 1 equemene
#define CUBLAS_GET_VECTOR       CUBLAS_GET_VECTOR
248 1 equemene
#define CUBLAS_SET_MATRIX       CUBLAS_SET_MATRIX
249 1 equemene
#define CUBLAS_GET_MATRIX       CUBLAS_GET_MATRIX
250 1 equemene
#define CUBLAS_GET_ERROR        CUBLAS_GET_ERROR
251 1 equemene
#define CUBLAS_XERBLA           CUBLAS_XERBLA
252 1 equemene
#define CUBLAS_ISAMAX           CUBLAS_ISAMAX
253 1 equemene
#define CUBLAS_ISAMIN           CUBLAS_ISAMIN
254 1 equemene
#define CUBLAS_SASUM            CUBLAS_SASUM
255 1 equemene
#define CUBLAS_SAXPY            CUBLAS_SAXPY
256 1 equemene
#define CUBLAS_SCOPY            CUBLAS_SCOPY
257 1 equemene
#define CUBLAS_SDOT             CUBLAS_SDOT
258 1 equemene
#define CUBLAS_SNRM2            CUBLAS_SNRM2
259 1 equemene
#define CUBLAS_SROT             CUBLAS_SROT
260 1 equemene
#define CUBLAS_SROTG            CUBLAS_SROTG
261 1 equemene
#define CUBLAS_SROTM            CUBLAS_SROTM
262 1 equemene
#define CUBLAS_SROTMG           CUBLAS_SROTMG
263 1 equemene
#define CUBLAS_SSCAL            CUBLAS_SSCAL
264 1 equemene
#define CUBLAS_SSWAP            CUBLAS_SSWAP
265 1 equemene
#define CUBLAS_CAXPY            CUBLAS_CAXPY
266 1 equemene
#define CUBLAS_CCOPY            CUBLAS_CCOPY
267 1 equemene
#define CUBLAS_ZCOPY            CUBLAS_ZCOPY
268 1 equemene
#define CUBLAS_CROT             CUBLAS_CROT
269 1 equemene
#define CUBLAS_CROTG            CUBLAS_CROTG
270 1 equemene
#define CUBLAS_CSCAL            CUBLAS_CSCAL
271 1 equemene
#define CUBLAS_CSROT            CUBLAS_CSROT
272 1 equemene
#define CUBLAS_CSSCAL           CUBLAS_CSSCAL
273 1 equemene
#define CUBLAS_CSWAP            CUBLAS_CSWAP
274 1 equemene
#define CUBLAS_ZSWAP            CUBLAS_ZSWAP
275 1 equemene
#define CUBLAS_CTRMV            CUBLAS_CTRMV
276 1 equemene
#define CUBLAS_CDOTU            CUBLAS_CDOTU
277 1 equemene
#define CUBLAS_CDOTC            CUBLAS_CDOTC
278 1 equemene
#define CUBLAS_ICAMAX           CUBLAS_ICAMAX
279 1 equemene
#define CUBLAS_SCASUM           CUBLAS_SCASUM
280 1 equemene
#define CUBLAS_SCNRM2           CUBLAS_SCNRM2
281 1 equemene
#define CUBLAS_SGBMV            CUBLAS_SGBMV
282 1 equemene
#define CUBLAS_SGEMV            CUBLAS_SGEMV
283 1 equemene
#define CUBLAS_SGER             CUBLAS_SGER
284 1 equemene
#define CUBLAS_SSBMV            CUBLAS_SSBMV
285 1 equemene
#define CUBLAS_SSPMV            CUBLAS_SSPMV
286 1 equemene
#define CUBLAS_SSPR             CUBLAS_SSPR
287 1 equemene
#define CUBLAS_SSPR2            CUBLAS_SSPR2
288 1 equemene
#define CUBLAS_SSYMV            CUBLAS_SSYMV
289 1 equemene
#define CUBLAS_SSYR             CUBLAS_SSYR
290 1 equemene
#define CUBLAS_SSYR2            CUBLAS_SSYR2
291 1 equemene
#define CUBLAS_STBMV            CUBLAS_STBMV
292 1 equemene
#define CUBLAS_STBSV            CUBLAS_STBSV
293 1 equemene
#define CUBLAS_STPMV            CUBLAS_STPMV
294 1 equemene
#define CUBLAS_STPSV            CUBLAS_STPSV
295 1 equemene
#define CUBLAS_STRMV            CUBLAS_STRMV
296 1 equemene
#define CUBLAS_STRSV            CUBLAS_STRSV
297 1 equemene
#define CUBLAS_SGEMM            CUBLAS_SGEMM
298 1 equemene
#define CUBLAS_SSYMM            CUBLAS_SSYMM
299 1 equemene
#define CUBLAS_SSYR2K           CUBLAS_SSYR2K
300 1 equemene
#define CUBLAS_SSYRK            CUBLAS_SSYRK
301 1 equemene
#define CUBLAS_STRMM            CUBLAS_STRMM
302 1 equemene
#define CUBLAS_STRSM            CUBLAS_STRSM
303 1 equemene
#define CUBLAS_CGEMM            CUBLAS_CGEMM
304 1 equemene
#define CUBLAS_CHEMM            CUBLAS_CHEMM
305 1 equemene
#define CUBLAS_CSYMM            CUBLAS_CSYMM
306 1 equemene
#define CUBLAS_CTRMM            CUBLAS_CTRMM
307 1 equemene
#define CUBLAS_CTRSM            CUBLAS_CTRSM
308 1 equemene
#define CUBLAS_CHERK            CUBLAS_CHERK
309 1 equemene
#define CUBLAS_CSYRK            CUBLAS_CSYRK
310 1 equemene
#define CUBLAS_CHER2K           CUBLAS_CHER2K
311 1 equemene
#define CUBLAS_CSYR2K           CUBLAS_CSYR2K
312 1 equemene
#define CUBLAS_IDAMAX           CUBLAS_IDAMAX
313 1 equemene
#define CUBLAS_IDAMIN           CUBLAS_IDAMIN
314 1 equemene
#define CUBLAS_DASUM            CUBLAS_DASUM
315 1 equemene
#define CUBLAS_DAXPY            CUBLAS_DAXPY
316 1 equemene
#define CUBLAS_DCOPY            CUBLAS_DCOPY
317 1 equemene
#define CUBLAS_DDOT             CUBLAS_DDOT
318 1 equemene
#define CUBLAS_DNRM2            CUBLAS_DNRM2
319 1 equemene
#define CUBLAS_DROT             CUBLAS_DROT
320 1 equemene
#define CUBLAS_DROTG            CUBLAS_DROTG
321 1 equemene
#define CUBLAS_DROTM            CUBLAS_DROTM
322 1 equemene
#define CUBLAS_DROTMG           CUBLAS_DROTMG
323 1 equemene
#define CUBLAS_DSCAL            CUBLAS_DSCAL
324 1 equemene
#define CUBLAS_DSWAP            CUBLAS_DSWAP
325 1 equemene
#define CUBLAS_ZAXPY            CUBLAS_ZAXPY
326 1 equemene
#define CUBLAS_ZCOPY            CUBLAS_ZCOPY
327 1 equemene
#define CUBLAS_ZROT             CUBLAS_ZROT
328 1 equemene
#define CUBLAS_ZROTG            CUBLAS_ZROTG
329 1 equemene
#define CUBLAS_ZSCAL            CUBLAS_ZSCAL
330 1 equemene
#define CUBLAS_ZDROT            CUBLAS_ZDROT
331 1 equemene
#define CUBLAS_ZDSCAL           CUBLAS_ZDSCAL
332 1 equemene
#define CUBLAS_ZSWAP            CUBLAS_ZSWAP
333 1 equemene
#define CUBLAS_ZDOTU            CUBLAS_ZDOTU
334 1 equemene
#define CUBLAS_ZDOTC            CUBLAS_ZDOTC
335 1 equemene
#define CUBLAS_IZAMAX           CUBLAS_IZAMAX
336 1 equemene
#define CUBLAS_DZASUM           CUBLAS_DZASUM
337 1 equemene
#define CUBLAS_DZNRM2           CUBLAS_DZNRM2
338 1 equemene
#define CUBLAS_DGBMV            CUBLAS_DGBMV
339 1 equemene
#define CUBLAS_DGEMV            CUBLAS_DGEMV
340 1 equemene
#define CUBLAS_ZGEMV            CUBLAS_ZGEMV
341 1 equemene
#define CUBLAS_DGER             CUBLAS_DGER
342 1 equemene
#define CUBLAS_DSBMV            CUBLAS_DSBMV
343 1 equemene
#define CUBLAS_DSPMV            CUBLAS_DSPMV
344 1 equemene
#define CUBLAS_DSPR             CUBLAS_DSPR
345 1 equemene
#define CUBLAS_DSPR2            CUBLAS_DSPR2
346 1 equemene
#define CUBLAS_DSYMV            CUBLAS_DSYMV
347 1 equemene
#define CUBLAS_DSYR             CUBLAS_DSYR
348 1 equemene
#define CUBLAS_DSYR2            CUBLAS_DSYR2
349 1 equemene
#define CUBLAS_DTBMV            CUBLAS_DTBMV
350 1 equemene
#define CUBLAS_DTBSV            CUBLAS_DTBSV
351 1 equemene
#define CUBLAS_DTPMV            CUBLAS_DTPMV
352 1 equemene
#define CUBLAS_DTPSV            CUBLAS_DTPSV
353 1 equemene
#define CUBLAS_DTRMV            CUBLAS_DTRMV
354 1 equemene
#define CUBLAS_DTRSV            CUBLAS_DTRSV
355 1 equemene
#define CUBLAS_DGEMM            CUBLAS_DGEMM
356 1 equemene
#define CUBLAS_DSYMM            CUBLAS_DSYMM
357 1 equemene
#define CUBLAS_DSYR2K           CUBLAS_DSYR2K
358 1 equemene
#define CUBLAS_ZSYRK            CUBLAS_ZSYRK
359 1 equemene
#define CUBLAS_DTRMM            CUBLAS_DTRMM
360 1 equemene
#define CUBLAS_DTRSM            CUBLAS_DTRSM
361 1 equemene
#define CUBLAS_ZGEMM            CUBLAS_ZGEMM
362 1 equemene
#define CUBLAS_ZHEMM            CUBLAS_ZHEMM
363 1 equemene
#define CUBLAS_ZSYMM            CUBLAS_ZSYMM
364 1 equemene
#define CUBLAS_ZTRMM            CUBLAS_ZTRMM
365 1 equemene
#define CUBLAS_ZTRSM            CUBLAS_ZTRSM
366 1 equemene
#define CUBLAS_ZHERK            CUBLAS_ZHERK
367 1 equemene
#define CUBLAS_ZSYRK            CUBLAS_ZSYRK
368 1 equemene
#define CUBLAS_ZHER2K           CUBLAS_ZHER2K
369 1 equemene
#define CUBLAS_ZSYR2K           CUBLAS_ZSYR2K
370 1 equemene
371 1 equemene
#define  CUBLAS_CGEMV           CUBLAS_CGEMV
372 1 equemene
#define  CUBLAS_CGBMV           CUBLAS_CGBMV
373 1 equemene
#define  CUBLAS_CHEMV           CUBLAS_CHEMV
374 1 equemene
#define  CUBLAS_CHBMV           CUBLAS_CHBMV
375 1 equemene
#define  CUBLAS_CHPMV           CUBLAS_CHPMV
376 1 equemene
#define  CUBLAS_CTBMV           CUBLAS_CTBMV
377 1 equemene
#define  CUBLAS_CTPMV           CUBLAS_CTPMV
378 1 equemene
#define  CUBLAS_CTRSV           CUBLAS_CTRSV
379 1 equemene
#define  CUBLAS_CTBSV           CUBLAS_CTBSV
380 1 equemene
#define  CUBLAS_CTPSV           CUBLAS_CTPSV
381 1 equemene
#define  CUBLAS_CGERC           CUBLAS_CGERC
382 1 equemene
#define  CUBLAS_CGERU           CUBLAS_CGERU
383 1 equemene
#define  CUBLAS_CHPR            CUBLAS_CHPR
384 1 equemene
385 1 equemene
386 1 equemene
// stubs for zblat2
387 1 equemene
#define CUBLAS_ZGBMV           CUBLAS_ZGBMV
388 1 equemene
#define CUBLAS_ZHEMV           CUBLAS_ZHEMV
389 1 equemene
#define CUBLAS_ZHBMV           CUBLAS_ZHBMV
390 1 equemene
#define CUBLAS_ZHPMV           CUBLAS_ZHPMV
391 1 equemene
#define CUBLAS_ZTRMV           CUBLAS_ZTRMV
392 1 equemene
#define CUBLAS_ZTBMV           CUBLAS_ZTBMV
393 1 equemene
#define CUBLAS_ZTPMV           CUBLAS_ZTPMV
394 1 equemene
#define CUBLAS_ZTRSV           CUBLAS_ZTRSV
395 1 equemene
#define CUBLAS_ZTBSV           CUBLAS_ZTBSV
396 1 equemene
#define CUBLAS_ZTPSV           CUBLAS_ZTPSV
397 1 equemene
#define CUBLAS_ZGERC           CUBLAS_ZGERC
398 1 equemene
#define CUBLAS_ZGERU           CUBLAS_ZGERU
399 1 equemene
#define CUBLAS_ZHER            CUBLAS_ZHER
400 1 equemene
#define CUBLAS_ZHPR            CUBLAS_ZHPR
401 1 equemene
#define CUBLAS_ZHER2           CUBLAS_ZHER2
402 1 equemene
#define CUBLAS_ZHPR2           CUBLAS_ZHPR2
403 1 equemene
404 1 equemene
#else
405 1 equemene
#error unsupported Fortran compiler
406 1 equemene
#endif