DSWAP(1)

NAME
LAPACK-3 - interchanges two vectors

SYNOPSIS

SUBROUTINE DSWAP(N,DX,INCX,DY,INCY)

INTEGER
    INCX,INCY,N

DOUBLE
    PRECISION DX(*),DY(*)

PURPOSE
   interchanges two vectors.
    uses unrolled loops for increments equal one.

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