Contents
     srotg - Construct a Given's plane rotation
     SUBROUTINE SROTG(A, B, C, S)
     REAL A, B, C, S
     SUBROUTINE SROTG_64(A, B, C, S)
     REAL A, B, C, S
  F95 INTERFACE
     SUBROUTINE ROTG(A, B, C, S)
     REAL :: A, B, C, S
     SUBROUTINE ROTG_64(A, B, C, S)
     REAL :: A, B, C, S
  C INTERFACE
     #include <sunperf.h>
     void srotg(float *a, float *b, float *c, float *s);
     void srotg_64(float *a, float *b, float *c, float *s);
     srotg Construct a Given's plane rotation that  will  annihi-
     late an element of a vector.
     A (input/output)
               On entry, A contains the entry in the first vector
               that  corresponds to the element to be annihilated
               in the  second  vector.   On  exit,  contains  the
               nonzero element of the rotated vector.
     B (input/output)
               On entry, B contains the entry to  be  annihilated
               in  the second vector.  On exit, contains either S
               or 1/C depending on which of the input values of A
               and B is larger.
     C (output)
               On exit, C and S are the elements of the  rotation
               matrix that will be applied to annihilate B.
     S (output)
               See the description of C.