SEARCH
NEW RPMS
DIRECTORIES
ABOUT
FAQ
VARIOUS
BLOG
DONATE


YUM REPOSITORY

 
 

MAN page from openSUSE Leap 15 blas-man-3.5.0-lp150.20.1.noarch.rpm

cswap.f

Section: LAPACK (3)
Updated: Thu Mar 29 2018
Index 

NAME

cswap.f 

SYNOPSIS


 

Functions/Subroutines


subroutine CSWAP (N, CX, INCX, CY, INCY)
CSWAP  

Function/Subroutine Documentation

 

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

CSWAP

Purpose:

   CSWAP interchanges two vectors.


 

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 52 of file cswap.f.

52 *53 *  -- Reference BLAS level1 routine (version 3.4.0) --54 *  -- Reference BLAS is a software package provided by Univ. of Tennessee,    --55 *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--56 *     November 201157 *58 *     .. Scalar Arguments ..59       INTEGER INCX,INCY,N60 *     ..61 *     .. Array Arguments ..62       COMPLEX CX(*),CY(*)63 *     ..64 *65 *  =====================================================================66 *67 *     .. Local Scalars ..68       COMPLEX CTEMP69       INTEGER I,IX,IY70 *     ..71       IF (n.LE.0) RETURN72       IF (incx.EQ.1 .AND. incy.EQ.1) THEN73 *74 *       code for both increments equal to 175          DO i = 1,n76             ctemp = cx(i)77             cx(i) = cy(i)78             cy(i) = ctemp79          END DO80       ELSE81 *82 *       code for unequal increments or equal increments not equal83 *         to 184 *85          ix = 186          iy = 187          IF (incx.LT.0) ix = (-n+1)*incx + 188          IF (incy.LT.0) iy = (-n+1)*incy + 189          DO i = 1,n90             ctemp = cx(ix)91             cx(ix) = cy(iy)92             cy(iy) = ctemp93             ix = ix + incx94             iy = iy + incy95          END DO96       END IF97       RETURN
 

Author

Generated automatically by Doxygen for LAPACK from the source code.


 

Index

NAME
SYNOPSIS
Functions/Subroutines
Function/Subroutine Documentation
subroutine CSWAP (integer N, complex, dimension(*) CX, integer INCX, complex, dimension(*) CY, integer INCY)
Author

This document was created byman2html,using the manual pages.