Go to the source code of this file.
real function sdsdot |
( |
integer |
N, |
|
|
real |
SB, |
|
|
real, dimension(*) |
SX, |
|
|
integer |
INCX, |
|
|
real, dimension(*) |
SY, |
|
|
integer |
INCY |
|
) |
| |
SDSDOT
- Purpose:
- Author
- Univ. of Tennessee
-
Univ. of California Berkeley
-
Univ. of Colorado Denver
-
NAG Ltd.
- Date
- November 2011
Definition at line 142 of file sdsdot.f.
220 DOUBLE PRECISION dsdot
231 IF (incx.EQ.incy .AND. incx.GT.0)
THEN
245 IF (incx.LT.0) kx = 1 + (1-n)*incx
246 IF (incy.LT.0) ky = 1 + (1-n)*incy
real function sdsdot(N, SB, SX, INCX, SY, INCY)
SDSDOT
double precision function dsdot(N, SX, INCX, SY, INCY)
DSDOT