NAME
cvmul - compute the scaled product of complex vectors
SUBROUTINE CVMUL(N, ALPHA, X, INCX, Y, INCY, BETA, Z, INCZ)
INTEGER N, INCX, INCY, INCZ
COMPLEX ALPHA, BETA, X(*), Y(*), Z(*)
#include <sunperf.h>
void cvmul(int n, complex *alpha, complex *x, int incx, com-
plex *y, int incy, complex *beta, complex *z, int
incz) ;
PURPOSE
CVMUL computes the scaled product of complex 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. CVMUL will return
immediately if N = 0.
ALPHA (input) COMPLEX
Scale factor on the multiplicand vectors.
X (input) COMPLEX(*)
Multiplicand vector.
INCX (input) INTEGER
Stride between elements of the multiplicand vector
X. INCX > 0.
Y (input) COMPLEX(*)
Multiplicand vector.
INCY (input) INTEGER
Stride between elements of the multiplicand vector
Y. INCY > 0.
BETA (input) COMPLEX
Scale factor on the product vector.
Z (output) COMPLEX(*)
Product vector. On exit, z(i) = ALPHA * x(i) *
y(i) + BETA * z(i).
INCZ (input) INTEGER
Stride between elements of Z. INCZ > 0.
|
Закладки на сайте Проследить за страницей |
Created 1996-2025 by Maxim Chirkov Добавить, Поддержать, Вебмастеру |