LAPACK
3.12.1
LAPACK: Linear Algebra PACKage
Toggle main menu visibility
Main Page
Related Pages
Routines
Modules
Modules List
Module Members
All
c
d
s
z
Functions/Subroutines
Variables
c
d
s
z
Data Types
Data Types List
Data Type Index
Data Fields
All
Functions/Subroutines
Variables
Files
File List
File Members
All
_
a
b
c
d
f
g
h
i
l
m
p
r
s
t
u
x
z
Functions/Subroutines
_
a
c
d
f
g
h
i
l
m
s
t
x
z
Variables
c
l
r
Typedefs
Enumerations
Enumerator
Macros
a
b
c
f
i
p
t
u
x
•
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Macros
Modules
Pages
Loading...
Searching...
No Matches
cblas_ddot.c
Go to the documentation of this file.
1
/*
2
* cblas_ddot.c
3
*
4
* The program is a C interface to ddot.
5
* It calls the fortran wrapper before calling ddot.
6
*
7
* Written by Keita Teranishi. 2/11/1998
8
*
9
*/
10
#include "
cblas.h
"
11
#include "
cblas_f77.h
"
12
double
API_SUFFIX
(
cblas_ddot
)(
const
CBLAS_INT
N,
const
double
*X,
13
const
CBLAS_INT
incX,
const
double
*Y,
const
CBLAS_INT
incY)
14
{
15
double
dot;
16
#ifdef F77_INT
17
F77_INT
F77_N
=N,
F77_incX
=incX,
F77_incY
=incY;
18
#else
19
#define F77_N N
20
#define F77_incX incX
21
#define F77_incY incY
22
#endif
23
F77_ddot_sub
( &
F77_N
, X, &
F77_incX
, Y, &
F77_incY
, &dot);
24
return
dot;
25
}
12
double
API_SUFFIX
(
cblas_ddot
)(
const
CBLAS_INT
N,
const
double
*X, {
…
}
API_SUFFIX
#define API_SUFFIX(a)
Definition
cblas.h:57
CBLAS_INT
#define CBLAS_INT
Definition
cblas.h:24
cblas.h
F77_incX
#define F77_incX
F77_incY
#define F77_incY
cblas_ddot
double API_SUFFIX cblas_ddot(const CBLAS_INT N, const double *X, const CBLAS_INT incX, const double *Y, const CBLAS_INT incY)
Definition
cblas_ddot.c:12
F77_N
#define F77_N
F77_INT
#define F77_INT
Definition
cblas_example2_64.c:4
F77_ddot_sub
#define F77_ddot_sub(...)
Definition
cblas_f77.h:261
cblas_f77.h
CBLAS
src
cblas_ddot.c
Generated on Mon Jan 20 2025 17:18:06 for LAPACK by
1.11.0