Contents


NAME

     srotg - Construct a Given's plane rotation

SYNOPSIS

     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);

PURPOSE

     srotg Construct a Given's plane rotation that  will  annihi-
     late an element of a vector.

ARGUMENTS

     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.