.TH "rotmg" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*-
.ad l
.nh
.SH NAME
rotmg \- rotmg: generate modified (fast) plane rotation
.SH SYNOPSIS
.br
.PP
.SS "Functions"

.in +1c
.ti -1c
.RI "subroutine \fBdrotmg\fP (dd1, dd2, dx1, dy1, dparam)"
.br
.RI "\fBDROTMG\fP "
.ti -1c
.RI "subroutine \fBsrotmg\fP (sd1, sd2, sx1, sy1, sparam)"
.br
.RI "\fBSROTMG\fP "
.in -1c
.SH "Detailed Description"
.PP 

.SH "Function Documentation"
.PP 
.SS "subroutine drotmg (double precision dd1, double precision dd2, double precision dx1, double precision dy1, double precision, dimension(5) dparam)"

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

.PP
.nf
    CONSTRUCT THE MODIFIED GIVENS TRANSFORMATION MATRIX H WHICH ZEROS
    THE SECOND COMPONENT OF THE 2-VECTOR  (DSQRT(DD1)*DX1,DSQRT(DD2)*>    DY2)**T\&.
    WITH DPARAM(1)=DFLAG, H HAS ONE OF THE FOLLOWING FORMS\&.\&.

    DFLAG=-1\&.D0     DFLAG=0\&.D0        DFLAG=1\&.D0     DFLAG=-2\&.D0

      (DH11  DH12)    (1\&.D0  DH12)    (DH11  1\&.D0)    (1\&.D0  0\&.D0)
    H=(          )    (          )    (          )    (          )
      (DH21  DH22),   (DH21  1\&.D0),   (-1\&.D0 DH22),   (0\&.D0  1\&.D0)\&.
    LOCATIONS 2-4 OF DPARAM CONTAIN DH11, DH21, DH12, AND DH22
    RESPECTIVELY\&. (VALUES OF 1\&.D0, -1\&.D0, OR 0\&.D0 IMPLIED BY THE
    VALUE OF DPARAM(1) ARE NOT STORED IN DPARAM\&.)

    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 DD1 AND DD2\&.  ALL ACTUAL SCALING OF DATA IS DONE USING GAM\&.
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fIDD1\fP 
.PP
.nf
          DD1 is DOUBLE PRECISION
.fi
.PP
.br
\fIDD2\fP 
.PP
.nf
          DD2 is DOUBLE PRECISION
.fi
.PP
.br
\fIDX1\fP 
.PP
.nf
          DX1 is DOUBLE PRECISION
.fi
.PP
.br
\fIDY1\fP 
.PP
.nf
          DY1 is DOUBLE PRECISION
.fi
.PP
.br
\fIDPARAM\fP 
.PP
.nf
          DPARAM is DOUBLE PRECISION array, dimension (5)
     DPARAM(1)=DFLAG
     DPARAM(2)=DH11
     DPARAM(3)=DH21
     DPARAM(4)=DH12
     DPARAM(5)=DH22
.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 \fBdrotmg\&.f\fP\&.
.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\&.