OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
ssdot.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine ssdot (n, dot, x, incx, y, incy)

Function/Subroutine Documentation

◆ ssdot()

subroutine ssdot ( integer n,
real dot,
real, dimension( * ) x,
integer incx,
real, dimension( * ) y,
integer incy )

Definition at line 1 of file ssdot.f.

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*
real function sdot(n, sx, incx, sy, incy)
SDOT
Definition sdot.f:82