[ новости /+++ | форум | теги | ]

NAME
     zvmul - compute the scaled product of complex*16 vectors

     SUBROUTINE ZVMUL(N, ALPHA, X, INCX, Y, INCY, BETA, Z, INCZ)

     INTEGER N, INCX, INCY, INCZ

     COMPLEX*16 ALPHA, BETA, X(*), Y(*), Z(*)



     #include <sunperf.h>

     void zvmul(int n, doublecomplex  *alpha,  doublecomplex  *x,
               int  incx,  doublecomplex *y, int incy, doublecom-
               plex *beta, doublecomplex *z, int incz) ;

PURPOSE
     ZVMUL computes the scaled product of complex*16 vectors:
       z(i) = ALPHA * x(i) * y(i) + BETA * z(i)
     for 1 <= i <= N.

ARGUMENTS
     N         (input) INTEGER
               Length of the vectors.  N >= 0.  ZVMUL will return
               immediately if N = 0.

     ALPHA     (input) COMPLEX*16
               Scale factor on the multiplicand vectors.

     X         (input) COMPLEX*16(*)
               Multiplicand vector.

     INCX      (input) INTEGER
               Stride between elements of the multiplicand vector
               X.  INCX > 0.

     Y         (input) COMPLEX*16(*)
               Multiplicand vector.

     INCY      (input) INTEGER
               Stride between elements of the multiplicand vector
               Y.  INCY > 0.

     BETA      (input) COMPLEX*16
               Scale factor on the product vector.

     Z         (output) COMPLEX*16(*)
               Product vector.  On exit, z(i) = ALPHA  *  x(i)  *
               y(i) + BETA * z(i).

     INCZ      (input) INTEGER
               Stride between elements of Z.  INCZ > 0.

Партнёры:

Хостинг: