.TH "rotm" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME rotm \- rotm: apply modified (fast) plane rotation .SH SYNOPSIS .br .PP .SS "Functions" .in +1c .ti -1c .RI "subroutine \fBdrotm\fP (n, dx, incx, dy, incy, dparam)" .br .RI "\fBDROTM\fP " .ti -1c .RI "subroutine \fBsrotm\fP (n, sx, incx, sy, incy, sparam)" .br .RI "\fBSROTM\fP " .in -1c .SH "Detailed Description" .PP .SH "Function Documentation" .PP .SS "subroutine drotm (integer n, double precision, dimension(*) dx, integer incx, double precision, dimension(*) dy, integer incy, double precision, dimension(5) dparam)" .PP \fBDROTM\fP .PP \fBPurpose:\fP .RS 4 .PP .nf !> !> APPLY THE MODIFIED GIVENS TRANSFORMATION, H, TO THE 2 BY N MATRIX !> !> (DX**T) , WHERE **T INDICATES TRANSPOSE\&. THE ELEMENTS OF DX ARE IN !> (DY**T) !> !> DX(LX+I*INCX), I = 0 TO N-1, WHERE LX = 1 IF INCX \&.GE\&. 0, ELSE !> LX = (-INCX)*N, AND SIMILARLY FOR SY USING LY AND INCY\&. !> 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)\&. !> SEE DROTMG FOR A DESCRIPTION OF DATA STORAGE IN DPARAM\&. !> .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIN\fP .PP .nf !> N is INTEGER !> number of elements in input vector(s) !> .fi .PP .br \fIDX\fP .PP .nf !> DX is DOUBLE PRECISION array, dimension ( 1 + ( N - 1 )*abs( INCX ) ) !> .fi .PP .br \fIINCX\fP .PP .nf !> INCX is INTEGER !> storage spacing between elements of DX !> .fi .PP .br \fIDY\fP .PP .nf !> DY is DOUBLE PRECISION array, dimension ( 1 + ( N - 1 )*abs( INCY ) ) !> .fi .PP .br \fIINCY\fP .PP .nf !> INCY is INTEGER !> storage spacing between elements of DY !> .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 \fB95\fP of file \fBdrotm\&.f\fP\&. .SS "subroutine srotm (integer n, real, dimension(*) sx, integer incx, real, dimension(*) sy, integer incy, real, dimension(5) sparam)" .PP \fBSROTM\fP .PP \fBPurpose:\fP .RS 4 .PP .nf !> !> APPLY THE MODIFIED GIVENS TRANSFORMATION, H, TO THE 2 BY N MATRIX !> !> (SX**T) , WHERE **T INDICATES TRANSPOSE\&. THE ELEMENTS OF SX ARE IN !> (SX**T) !> !> SX(LX+I*INCX), I = 0 TO N-1, WHERE LX = 1 IF INCX \&.GE\&. 0, ELSE !> LX = (-INCX)*N, AND SIMILARLY FOR SY USING USING LY AND INCY\&. !> 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)\&. !> SEE SROTMG FOR A DESCRIPTION OF DATA STORAGE IN SPARAM\&. !> !> .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIN\fP .PP .nf !> N is INTEGER !> number of elements in input vector(s) !> .fi .PP .br \fISX\fP .PP .nf !> SX is REAL array, dimension ( 1 + ( N - 1 )*abs( INCX ) ) !> .fi .PP .br \fIINCX\fP .PP .nf !> INCX is INTEGER !> storage spacing between elements of SX !> .fi .PP .br \fISY\fP .PP .nf !> SY is REAL array, dimension ( 1 + ( N - 1 )*abs( INCY ) ) !> .fi .PP .br \fIINCY\fP .PP .nf !> INCY is INTEGER !> storage spacing between elements of SY !> .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 \fB96\fP of file \fBsrotm\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.