Mercurial > octave

annotate liboctave/numeric/lo-blas-proto.h @ 23083:e9a0469dedd9 stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: strip extra trailing newlines from files.
author John W. Eaton <jwe@octave.org>
date Fri, 20 Jan 2017 12:19:08 -0500
parents 4caa7b28d183
children ef4d915df748 3ac9f9ecfae5
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
22322
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
1 /*
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
2
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
3 Copyright (C) 2016 John W. Eaton
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
4
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
5 This file is part of Octave.
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
6
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
7 Octave is free software; you can redistribute it and/or modify it
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
8 under the terms of the GNU General Public License as published by the
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
9 Free Software Foundation; either version 3 of the License, or (at your
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
10 option) any later version.
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
11
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
12 Octave is distributed in the hope that it will be useful, but WITHOUT
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
15 for more details.
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
16
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
18 along with Octave; see the file COPYING. If not, see
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
19 <http://www.gnu.org/licenses/>.
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
20
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
21 */
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
22
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
23 #if ! defined (octave_lo_blas_proto_h)
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
24 #define octave_lo_blas_proto_h 1
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
25
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
26 #include "octave-config.h"
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
27
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
28 #include "f77-fcn.h"
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
29
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
30 extern "C"
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
31 {
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
32 // DOT (liboctave/cruft/blas-xtra)
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
33
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
34 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
35 F77_FUNC (xddot, XDDOT) (const F77_INT&, const F77_DBLE*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
36 const F77_INT&, const F77_DBLE*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
37 const F77_INT&, F77_DBLE&);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
38
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
39 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
40 F77_FUNC (xsdot, XSDOT) (const F77_INT&, const F77_REAL*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
41 const F77_INT&, const F77_REAL*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
42 const F77_INT&, F77_REAL&);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
43
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
44 // DOT3
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
45
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
46 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
47 F77_FUNC (ddot3, DDOT3) (const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
48 const F77_INT&, const F77_DBLE*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
49 const F77_DBLE*, F77_DBLE*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
50
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
51 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
52 F77_FUNC (sdot3, SDOT3) (const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
53 const F77_INT&, const F77_REAL*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
54 const F77_REAL*, F77_REAL*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
55
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
56 // DOTC (liboctave/cruft/blas-xtra)
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
57
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
58 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
59 F77_FUNC (xcdotc, XCDOTC) (const F77_INT&, const F77_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
60 const F77_INT&, const F77_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
61 const F77_INT&, F77_CMPLX*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
62
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
63 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
64 F77_FUNC (xzdotc, XZDOTC) (const F77_INT&, const F77_DBLE_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
65 const F77_INT&, const F77_DBLE_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
66 const F77_INT&, F77_DBLE_CMPLX*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
67
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
68 // DOTC3
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
69
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
70 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
71 F77_FUNC (cdotc3, CDOTC3) (const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
72 const F77_INT&, const F77_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
73 const F77_CMPLX*, F77_CMPLX*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
74
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
75 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
76 F77_FUNC (zdotc3, ZDOTC3) (const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
77 const F77_INT&, const F77_DBLE_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
78 const F77_DBLE_CMPLX*, F77_DBLE_CMPLX*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
79
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
80 // DOTU (liboctave/cruft/blas-xtra)
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
81
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
82 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
83 F77_FUNC (xcdotu, XCDOTU) (const F77_INT&, const F77_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
84 const F77_INT&, const F77_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
85 const F77_INT&, F77_CMPLX*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
86
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
87 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
88 F77_FUNC (xzdotu, XZDOTU) (const F77_INT&, const F77_DBLE_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
89 const F77_INT&, const F77_DBLE_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
90 const F77_INT&, F77_DBLE_CMPLX*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
91
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
92 // GEMM
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
93
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
94 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
95 F77_FUNC (cgemm, CGEMM) (F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
96 F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
97 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
98 const F77_INT&, const F77_CMPLX&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
99 const F77_CMPLX*, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
100 const F77_CMPLX*, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
101 const F77_CMPLX&, F77_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
102 const F77_INT&
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
103 F77_CHAR_ARG_LEN_DECL
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
104 F77_CHAR_ARG_LEN_DECL);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
105
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
106 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
107 F77_FUNC (dgemm, DGEMM) (F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
108 F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
109 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
110 const F77_INT&, const F77_DBLE&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
111 const F77_DBLE*, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
112 const F77_DBLE*, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
113 const F77_DBLE&, F77_DBLE*, const F77_INT&
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
114 F77_CHAR_ARG_LEN_DECL
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
115 F77_CHAR_ARG_LEN_DECL);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
116
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
117 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
118 F77_FUNC (sgemm, SGEMM) (F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
119 F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
120 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
121 const F77_INT&, const F77_REAL&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
122 const F77_REAL*, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
123 const F77_REAL*, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
124 const F77_REAL&, F77_REAL*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
125 const F77_INT&
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
126 F77_CHAR_ARG_LEN_DECL
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
127 F77_CHAR_ARG_LEN_DECL);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
128
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
129 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
130 F77_FUNC (zgemm, ZGEMM) (F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
131 F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
132 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
133 const F77_INT&, const F77_DBLE_CMPLX&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
134 const F77_DBLE_CMPLX*, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
135 const F77_DBLE_CMPLX*, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
136 const F77_DBLE_CMPLX&, F77_DBLE_CMPLX*, const F77_INT&
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
137 F77_CHAR_ARG_LEN_DECL
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
138 F77_CHAR_ARG_LEN_DECL);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
139
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
140 // GEMV
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
141
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
142 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
143 F77_FUNC (cgemv, CGEMV) (F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
144 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
145 const F77_CMPLX&, const F77_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
146 const F77_INT&, const F77_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
147 const F77_INT&, const F77_CMPLX&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
148 F77_CMPLX*, const F77_INT&
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
149 F77_CHAR_ARG_LEN_DECL);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
150
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
151 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
152 F77_FUNC (dgemv, DGEMV) (F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
153 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
154 const F77_DBLE&, const F77_DBLE*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
155 const F77_INT&, const F77_DBLE*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
156 const F77_INT&, const F77_DBLE&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
157 F77_DBLE*, const F77_INT&
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
158 F77_CHAR_ARG_LEN_DECL);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
159
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
160 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
161 F77_FUNC (sgemv, SGEMV) (F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
162 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
163 const F77_REAL&, const F77_REAL*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
164 const F77_INT&, const F77_REAL*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
165 const F77_INT&, const F77_REAL&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
166 F77_REAL*, const F77_INT&
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
167 F77_CHAR_ARG_LEN_DECL);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
168
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
169 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
170 F77_FUNC (zgemv, ZGEMV) (F77_CONST_CHAR_ARG_DECL,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
171 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
172 const F77_DBLE_CMPLX&, const F77_DBLE_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
173 const F77_INT&, const F77_DBLE_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
174 const F77_INT&, const F77_DBLE_CMPLX&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
175 F77_DBLE_CMPLX*, const F77_INT&
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
176 F77_CHAR_ARG_LEN_DECL);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
177
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
178 // MATM3
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
179
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
180 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
181 F77_FUNC (cmatm3, CMATM3) (const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
182 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
183 const F77_CMPLX*, const F77_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
184 F77_CMPLX*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
185 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
186 F77_FUNC (dmatm3, DMATM3) (const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
187 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
188 const F77_DBLE*, const F77_DBLE*, F77_DBLE*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
189
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
190 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
191 F77_FUNC (smatm3, SMATM3) (const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
192 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
193 const F77_REAL*, const F77_REAL*, F77_REAL*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
194
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
195 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
196 F77_FUNC (zmatm3, ZMATM3) (const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
197 const F77_INT&, const F77_INT&,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
198 const F77_DBLE_CMPLX*, const F77_DBLE_CMPLX*,
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
199 F77_DBLE_CMPLX*);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
200
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
201 // XERBLA
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
202
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
203 F77_RET_T
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
204 F77_FUNC (xerbla, XERBLA) (F77_CONST_CHAR_ARG_DECL, const F77_INT&
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
205 F77_CHAR_ARG_LEN_DECL);
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
206 }
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
207
93b3cdd36854 move most f77 function decls to separate header files
John W. Eaton <jwe@octave.org>
parents:
diff changeset
208 #endif