Go to main content
Oracle Developer Studio 12.5 Man Pages

Exit Print View

Updated: June 2017
 
 

zsctr (3p)

Name

zsctr - Scatters elements from x into y

Synopsis

SUBROUTINE ZSCTR(NZ, X, INDX, Y)

DOUBLE COMPLEX X(*), Y(*)
INTEGER NZ
INTEGER INDX(*)

SUBROUTINE ZSCTR_64(NZ, X, INDX, Y)

DOUBLE COMPLEX X(*), Y(*)
INTEGER*8 NZ
INTEGER*8 INDX(*)


F95 INTERFACE
SUBROUTINE SCTR(NZ, X, INDX, Y)

COMPLEX(8), DIMENSION(:) :: X, Y
INTEGER :: NZ
INTEGER, DIMENSION(:) :: INDX

SUBROUTINE SCTR_64(NZ, X, INDX, Y)

COMPLEX(8), DIMENSION(:) :: X, Y
INTEGER(8) :: NZ
INTEGER(8), DIMENSION(:) :: INDX





C INTERFACE
#include <sunperf.h>

void zsctr (const int nz, const doublecomplex* x, const int* indx, dou-
blecomplex* y);

void zsctr_64 (const long nz, const doublecomplex* x, const long* indx,
doublecomplex* y);

Description

Oracle Solaris Studio Performance Library                            zsctr(3P)



NAME
       zsctr - Scatters elements from x into y

SYNOPSIS
        SUBROUTINE ZSCTR(NZ, X, INDX, Y)

        DOUBLE COMPLEX X(*), Y(*)
        INTEGER NZ
        INTEGER INDX(*)

        SUBROUTINE ZSCTR_64(NZ, X, INDX, Y)

        DOUBLE COMPLEX X(*), Y(*)
        INTEGER*8 NZ
        INTEGER*8 INDX(*)


   F95 INTERFACE
        SUBROUTINE SCTR(NZ, X, INDX, Y)

        COMPLEX(8), DIMENSION(:) :: X, Y
        INTEGER :: NZ
        INTEGER, DIMENSION(:) :: INDX

        SUBROUTINE SCTR_64(NZ, X, INDX, Y)

        COMPLEX(8), DIMENSION(:) :: X, Y
        INTEGER(8) :: NZ
        INTEGER(8), DIMENSION(:) :: INDX





   C INTERFACE
       #include <sunperf.h>

       void zsctr (const int nz, const doublecomplex* x, const int* indx, dou-
                 blecomplex* y);

       void zsctr_64 (const long nz, const doublecomplex* x, const long* indx,
                 doublecomplex* y);




PURPOSE
       ZSCTR - 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         7 Nov 2015                         zsctr(3P)