====================================================================
dswap examples
====================================================================

dx:PRIMARR(DFLOAT):=[[1.0, 2.0, 3.0, 4.0,  5.0]]

  [1.,2.,3.,4.,5.]

dy:PRIMARR(DFLOAT):=[[9.0, 8.0, 7.0, 6.0, -5.0]]

  [9.,8.,7.,6.,- 5.]

dswap(5,dx,1,dy,1)

  [[9.,8.,7.,6.,- 5.],[1.,2.,3.,4.,5.]]

dx:PRIMARR(DFLOAT):=[[1.0, 2.0, 3.0, 4.0,  5.0]]

  [1.,2.,3.,4.,5.]

dy:PRIMARR(DFLOAT):=[[9.0, 8.0, 7.0, 6.0, -5.0]]

  [9.,8.,7.,6.,- 5.]

dswap(3,dx,2,dy,2)

  [[9.,2.,7.,4.,- 5.],[1.,8.,3.,6.,5.]]

dx:PRIMARR(DFLOAT):=[[1.0, 2.0, 3.0, 4.0,  5.0]]

  [1.,2.,3.,4.,5.]

dy:PRIMARR(DFLOAT):=[[9.0, 8.0, 7.0, 6.0, -5.0]]

  [9.,8.,7.,6.,- 5.]

dswap(5,dx,1,dy,-1)

 [[9.,8.,7.,6.,- 5.],[1.,2.,3.,4.,5.]]


====================================================================
Man Page Details
====================================================================

NAME
       DSWAP - BLAS level one, Swaps two double precision vectors

SYNOPSIS
       SUBROUTINE DSWAP    ( n, x, incx, y, incy )

           INTEGER           n, incx, incy

           DOUBLE PRECISION  x, y


DESCRIPTION
       DSWAP  swaps  two double precision vectors, it interchanges n values of
       vector x and vector y.  incx and incy specify the increment between two
       consecutive elements of respectively vector x and y.


       This routine performs the following vector operation:

                 x <-> y

            where x and y are double precision vectors.

ARGUMENTS
       n       INTEGER. (input)
               Number of vector elements to be swapped.
               If n <= 0, this routine returns without computation.

       x       DOUBLE PRECISION, (input and output)
               Array of dimension (n-1) * |incx| + 1.

       incx    INTEGER. (input)
               Increment between elements of x.
               If incx = 0, the results will be unpredictable.

       y       DOUBLE PRECISION, (input and output)
               array of dimension (n-1) * |incy| + 1. Vector to be swapped.

       incy    INTEGER. (input)
               Increment between elements of y.  If incy = 0, the results will
               be unpredictable.

NOTES
       When  working  backward  (incx < 0 or incy < 0), each routine starts at
       the end of the vector and moves backward, as follows:

            x(1-incx * (n-1)), x(1-incx * (n-2)), ..., x(1)

            y(1-incy * (n-1)), y(1-incy * (n-2)), ..., y(1)

