drotm(3P) Sun Performance Library drotm(3P)NAMEdrotm - Apply a Gentleman's modified Given's rotation constructed by
SROTMG.
SYNOPSIS
SUBROUTINE DROTM(N, X, INCX, Y, INCY, PARAM)
INTEGER N, INCX, INCY
DOUBLE PRECISION X(*), Y(*), PARAM(*)
SUBROUTINE DROTM_64(N, X, INCX, Y, INCY, PARAM)
INTEGER*8 N, INCX, INCY
DOUBLE PRECISION X(*), Y(*), PARAM(*)
F95 INTERFACE
SUBROUTINE ROTM([N], X, [INCX], Y, [INCY], PARAM)
INTEGER :: N, INCX, INCY
REAL(8), DIMENSION(:) :: X, Y, PARAM
SUBROUTINE ROTM_64([N], X, [INCX], Y, [INCY], PARAM)
INTEGER(8) :: N, INCX, INCY
REAL(8), DIMENSION(:) :: X, Y, PARAM
C INTERFACE
#include <sunperf.h>
void drotm(int n, double *x, int incx, double *y, int incy, double
*param);
void drotm_64(long n, double *x, long incx, double *y, long incy, dou‐
ble *param);
PURPOSEdrotm Apply a Given's rotation constructed by SROTMG.
ARGUMENTS
N (input)
On entry, N specifies the number of elements in the vector.
N must be at least one for the subroutine to have any visible
effect. Unchanged on exit.
X (input/output)
( 1 + ( n - 1 )*abs( INCX ) ). On entry, the incremented
array X must contain the vector x. On exit, X is overwritten
by the updated vector x.
INCX (input)
On entry, INCX specifies the increment for the elements of X.
INCX must not be zero. Unchanged on exit.
Y (input/output)
( 1 + ( n - 1 )*abs( INCY ) ). On entry, the incremented
array Y must contain the vector y. On exit, Y is overwritten
by the updated vector y.
INCY (input)
On entry, INCY specifies the increment for the elements of Y.
INCY must not be zero. Unchanged on exit.
PARAM (input)
On entry, the rotation values constructed by SROTMG.
Unchanged on exit.
6 Mar 2009 drotm(3P)