.TH "BLAS/SRC/srotm.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME BLAS/SRC/srotm.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBsrotm\fP (n, sx, incx, sy, incy, sparam)" .br .RI "\fBSROTM\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .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\&.