Previous: ssvdc Up: ../linpack.html Next: strco

SSWAP

       SUBROUTINE  SSWAP (N,SX,INCX,SY,INCY)
       REAL SX(1),SY(1)
       INTEGER INCX,INCY,N
 C
 C     INTERCHANGES TWO VECTORS.
 C     USES UNROLLED LOOPS FOR INCREMENTS EQUAL TO 1.
 C     JACK DONGARRA, LINPACK, 3/11/78.
 C