.TH "BLAS/SRC/srotmg.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*-
.ad l
.nh
.SH NAME
BLAS/SRC/srotmg.f
.SH SYNOPSIS
.br
.PP
.SS "Functions/Subroutines"

.in +1c
.ti -1c
.RI "subroutine \fBsrotmg\fP (sd1, sd2, sx1, sy1, sparam)"
.br
.RI "\fBSROTMG\fP "
.in -1c
.SH "Function/Subroutine Documentation"
.PP 
.SS "subroutine srotmg (real sd1, real sd2, real sx1, real sy1, real, dimension(5) sparam)"

.PP
\fBSROTMG\fP 
.PP
\fBPurpose:\fP
.RS 4

.PP
.nf
!>
!>    CONSTRUCT THE MODIFIED GIVENS TRANSFORMATION MATRIX H WHICH ZEROS
!>    THE SECOND COMPONENT OF THE 2-VECTOR  (SQRT(SD1)*SX1,SQRT(SD2)*>    SY2)**T\&.
!>    WITH SPARAM(1)=SFLAG, H HAS ONE OF THE FOLLOWING FORMS\&.\&.
!>
!>    SFLAG=-1\&.E0     SFLAG=0\&.E0        SFLAG=1\&.E0     SFLAG=-2\&.E0
!>
!>      (SH11  SH12)    (1\&.E0  SH12)    (SH11  1\&.E0)    (1\&.E0  0\&.E0)
!>    H=(          )    (          )    (          )    (          )
!>      (SH21  SH22),   (SH21  1\&.E0),   (-1\&.E0 SH22),   (0\&.E0  1\&.E0)\&.
!>    LOCATIONS 2-4 OF SPARAM CONTAIN SH11,SH21,SH12, AND SH22
!>    RESPECTIVELY\&. (VALUES OF 1\&.E0, -1\&.E0, OR 0\&.E0 IMPLIED BY THE
!>    VALUE OF SPARAM(1) ARE NOT STORED IN SPARAM\&.)
!>
!>    THE VALUES OF GAMSQ AND RGAMSQ SET IN THE DATA STATEMENT MAY BE
!>    INEXACT\&.  THIS IS OK AS THEY ARE ONLY USED FOR TESTING THE SIZE
!>    OF SD1 AND SD2\&.  ALL ACTUAL SCALING OF DATA IS DONE USING GAM\&.
!>
!> 
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fISD1\fP 
.PP
.nf
!>          SD1 is REAL
!> 
.fi
.PP
.br
\fISD2\fP 
.PP
.nf
!>          SD2 is REAL
!> 
.fi
.PP
.br
\fISX1\fP 
.PP
.nf
!>          SX1 is REAL
!> 
.fi
.PP
.br
\fISY1\fP 
.PP
.nf
!>          SY1 is REAL
!> 
.fi
.PP
.br
\fISPARAM\fP 
.PP
.nf
!>          SPARAM is REAL array, dimension (5)
!>     SPARAM(1)=SFLAG
!>     SPARAM(2)=SH11
!>     SPARAM(3)=SH21
!>     SPARAM(4)=SH12
!>     SPARAM(5)=SH22
!> 
.fi
.PP
 
.RE
.PP
\fBAuthor\fP
.RS 4
Univ\&. of Tennessee 

.PP
Univ\&. of California Berkeley 

.PP
Univ\&. of Colorado Denver 

.PP
NAG Ltd\&. 
.RE
.PP

.PP
Definition at line \fB89\fP of file \fBsrotmg\&.f\fP\&.
.SH "Author"
.PP 
Generated automatically by Doxygen for LAPACK from the source code\&.