MAN page from openSUSE Leap 42 blas-man-3.5.0-9.1.noarch.rpm

caxpy.f

Section: LAPACK (3)
Updated: Fri Nov 4 2016
Index

NAME

caxpy.f -

SYNOPSIS

Functions/Subroutines

subroutine CAXPY (N, CA, CX, INCX, CY, INCY)
CAXPY

Function/Subroutine Documentation

subroutine CAXPY (integer N, complex CA, complex, dimension() CX, integer INCX, complex, dimension() CY, integer INCY)

CAXPY

Purpose:

    CAXPY constant times a vector plus a vector.

Author:

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Date:

: November 2011

Further Details:

     jack dongarra, linpack, 3/11/78.     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 53 of file caxpy.f.

53 *54 *  -- Reference BLAS level1 routine (version 3.4.0) --55 *  -- Reference BLAS is a software package provided by Univ. of Tennessee,    --56 *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--57 *     November 201158 *59 *     .. Scalar Arguments ..60       COMPLEX ca61       INTEGER incx,incy,n62 *     ..63 *     .. Array Arguments ..64       COMPLEX cx(*),cy(*)65 *     ..66 *67 *  =====================================================================68 *69 *     .. Local Scalars ..70       INTEGER i,ix,iy71 *     ..72 *     .. External Functions ..73       REAL scabs174       EXTERNAL scabs175 *     ..76       IF (n.LE.0) RETURN77       IF (scabs1(ca).EQ.0.0e+0) RETURN78       IF (incx.EQ.1 .AND. incy.EQ.1) THEN79 *80 *        code for both increments equal to 181 *82          DO i = 1,n83             cy(i) = cy(i) + ca*cx(i)84          END DO85       ELSE86 *87 *        code for unequal increments or equal increments88 *          not equal to 189 *90          ix = 191          iy = 192          IF (incx.LT.0) ix = (-n+1)*incx + 193          IF (incy.LT.0) iy = (-n+1)*incy + 194          DO i = 1,n95             cy(iy) = cy(iy) + ca*cx(ix)96             ix = ix + incx97             iy = iy + incy98          END DO99       END IF100 *101       RETURN

Author

Generated automatically by Doxygen for LAPACK from the source code.

Index

NAME

SYNOPSIS

Functions/Subroutines

Function/Subroutine Documentation

subroutine CAXPY (integer N, complex CA, complex, dimension(*) CX, integer INCX, complex, dimension(*) CY, integer INCY)

Author

This document was created byman2html,using the manual pages.