csctr(3P) Sun Performance Library csctr(3P)NAMEcsctr - Scatters elements from x into y.
SYNOPSIS
SUBROUTINE CSCTR(NZ, X, INDX, Y)
COMPLEX X(*), Y(*)
INTEGER NZ
INTEGER INDX(*)
SUBROUTINE CSCTR_64(NZ, X, INDX, Y)
COMPLEX X(*), Y(*)
INTEGER*8 NZ
INTEGER*8 INDX(*)
F95 INTERFACE
SUBROUTINE SCTR([NZ], X, INDX, Y)
COMPLEX, DIMENSION(:) :: X, Y
INTEGER :: NZ
INTEGER, DIMENSION(:) :: INDX
SUBROUTINE SCTR_64([NZ], X, INDX, Y)
COMPLEX, DIMENSION(:) :: X, Y
INTEGER(8) :: NZ
INTEGER(8), DIMENSION(:) :: INDX
C INTERFACE
#include <sunperf.h>
void csctr (const int nz, const floatcomplex* x, const int* indx,
floatcomplex* y);
void csctr_64 (const long nz, const floatcomplex* x, const long* indx,
floatcomplex* y);
PURPOSE
CSCTR - Scatters the components of a sparse vector x stored in com‐
pressed form into specified components of a vector y in full storage
form.
do i = 1, n
y(indx(i)) = x(i)
enddo
ARGUMENTS
NZ (input) - INTEGER
Number of elements in the compressed form. Unchanged on exit.
X (input)
Vector containing the values to be scattered from compressed
form into full storage form. Unchanged on exit.
INDX (input) - INTEGER
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 (output)
Vector whose elements specified by indx have been set to the
corresponding entries of x. Only the elements corresponding to
the indices in indx have been modified.
3rd Berkeley Distribution 6 Mar 2009 csctr(3P)