Contents

• NAME
• SYNOPSIS
  • F95 INTERFACE
  • C INTERFACE
• PURPOSE
• ARGUMENTS

NAME

     srotm - Apply a Gentleman's modified Given's  rotation  con-
     structed by SROTMG.

SYNOPSIS

     SUBROUTINE SROTM(N, X, INCX, Y, INCY, PARAM)

     INTEGER N, INCX, INCY
     REAL X(*), Y(*), PARAM(*)

     SUBROUTINE SROTM_64(N, X, INCX, Y, INCY, PARAM)

     INTEGER*8 N, INCX, INCY
     REAL X(*), Y(*), PARAM(*)

  F95 INTERFACE
     SUBROUTINE ROTM([N], X, [INCX], Y, [INCY], PARAM)

     INTEGER :: N, INCX, INCY
     REAL, DIMENSION(:) :: X, Y, PARAM

     SUBROUTINE ROTM_64([N], X, [INCX], Y, [INCY], PARAM)

     INTEGER(8) :: N, INCX, INCY
     REAL, DIMENSION(:) :: X, Y, PARAM

  C INTERFACE
     #include <sunperf.h>

     void srotm(int n, float *x, int incx, float  *y,  int  incy,
               float *param);

     void srotm_64(long n, float *x, long incx,  float  *y,  long
               incy, float *param);

PURPOSE

     srotm 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 sub-
               routine 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.