ScaLAPACK 2.1  2.1
ScaLAPACK: Scalable Linear Algebra PACKage
ssdot.f
Go to the documentation of this file.
1  SUBROUTINE ssdot( N, DOT, X, INCX, Y, INCY )
2 *
3 * -- ScaLAPACK tools routine (version 1.7) --
4 * University of Tennessee, Knoxville, Oak Ridge National Laboratory,
5 * and University of California, Berkeley.
6 * May 1, 1997
7 *
8 * .. Scalar Arguments ..
9  INTEGER INCX, INCY, N
10  REAL DOT
11 * ..
12 * .. Array Arguments ..
13  REAL X( * ), Y( * )
14 * ..
15 *
16 * Purpose
17 * =======
18 *
19 * SSDOT is a simple FORTRAN wrapper around the BLAS function
20 * SDOT returning the result in the parameter list instead.
21 *
22 * =====================================================================
23 *
24 * .. External Functions ..
25  REAL SDOT
26  EXTERNAL sdot
27 * ..
28 * .. Executable Statements ..
29 *
30  dot = sdot( n, x, incx, y, incy )
31 *
32  RETURN
33 *
34 * End of SSDOT
35 *
36  END
ssdot
subroutine ssdot(N, DOT, X, INCX, Y, INCY)
Definition: ssdot.f:2