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

Go to the source code of this file.

Functions/Subroutines

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

Function/Subroutine Documentation

◆ dddot()

subroutine dddot ( integer n,
double precision dot,
double precision, dimension( * ) x,
integer incx,
double precision, dimension( * ) y,
integer incy )

Definition at line 1 of file dddot.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 DOUBLE PRECISION DOT
11* ..
12* .. Array Arguments ..
13 DOUBLE PRECISION X( * ), Y( * )
14* ..
15*
16* Purpose
17* =======
18*
19* DDDOT is a simple FORTRAN wrapper around the BLAS function
20* DDOT returning the result in the parameter list instead.
21*
22* =====================================================================
23*
24* .. External Functions ..
25 DOUBLE PRECISION DDOT
26 EXTERNAL ddot
27* ..
28* .. Executable Statements ..
29*
30 dot = ddot( n, x, incx, y, incy )
31*
32 RETURN
33*
34* End of DDDOT
35*
double precision function ddot(n, dx, incx, dy, incy)
DDOT
Definition ddot.f:82