Purpose
  To perform the Givens transformation, defined by C (cos) and S
  (sin), and interchange the vectors involved, i.e.
     |X(i)|    | 0   1 |   | C   S |   |X(i)|
     |    | := |       | x |       | x |    |, i = 1,...N.
     |Y(i)|    | 1   0 |   |-S   C |   |Y(i)|
  REMARK. This routine is a modification of DROT from BLAS.
          This routine is called only by the SLICOT routines MB04TX
          and MB04VX.
Numerical Aspects
The algorithm is backward stable.Specification
      SUBROUTINE MB04TU( N, X, INCX, Y, INCY, C, S )
C     .. Scalar Arguments ..
      INTEGER           INCX, INCY, N
      DOUBLE PRECISION  C, S
C     .. Array Arguments ..
      DOUBLE PRECISION  X(*), Y(*)
Further Comments
NoneExample
Program Text
NoneProgram Data
NoneProgram Results
None