cdotui(3P) Sun Performance Library cdotui(3P)NAMEcdotui - Compute the complex unconjugated indexed dot product.
SYNOPSIS
COMPLEX FUNCTION CDOTUI(NZ, X, INDX, Y)
COMPLEX X(*), Y(*)
INTEGER NZ
INTEGER INDX(*)
COMPLEX FUNCTION CDOTUI_64(NZ, X, INDX, Y)
COMPLEX X(*), Y(*)
INTEGER*8 NZ
INTEGER*8 INDX(*)
F95 INTERFACE
COMPLEX FUNCTION DOTUI([NZ], X, INDX, Y)
COMPLEX, DIMENSION(:) :: X, Y
INTEGER :: NZ
INTEGER, DIMENSION(:) :: INDX
COMPLEX FUNCTION DOTUI_64([NZ], X, INDX, Y)
COMPLEX, DIMENSION(:) :: X, Y
INTEGER(8) :: NZ
INTEGER(8), DIMENSION(:) :: INDX
C INTERFACE
#include <sunperf.h>
floatcomplex cdotui (const int nz, const floatcomplex* x, const int*
indx, const floatcomplex* y);
floatcomplex cdotui_64 (const long nz, const floatcomplex* x, const
long* indx, const floatcomplex* y);
PURPOSE
CDOTUI Compute the complex unconjugated indexed dot product of a com‐
plex sparse vector x stored in compressed form with a complex vector y
in full storage form.
dot = 0
do i = 1, n
dot = dot + x(i) * y(indx(i))
enddo
ARGUMENTS
NZ (input)
Number of elements in the compressed form. Unchanged on exit.
X (input)
Vector in compressed form. Unchanged on exit.
INDX (input)
Vector containing the indices of the compressed form. It is
assumed that the elements in INDX are distinct and greater than
zero. Unchanged on exit.
Y (input)
Vector in full storage form. Only the elements corresponding
to the indices in INDX will be accessed.
3rd Berkeley Distribution 6 Mar 2009 cdotui(3P)
