NAME

slar2v - apply a vector of real plane rotations from both sides to a sequence of 2-by-2 real symmetric matrices, defined by the elements of the vectors x, y and z

SYNOPSIS

SUBROUTINE SLAR2V( N, X, Y, Z, INCX, C, S, INCC )

INTEGER INCC, INCX, N

REAL C( ∗ ), S( ∗ ), X( ∗ ), Y( ∗ ), Z( ∗ )

#include <sunperf.h>

void slar2v(int n, float ∗sx, float ∗sy, float ∗sz, int incx, float ∗sc, float ∗s, int incc) ;

PURPOSE

SLAR2V applies a vector of real plane rotations from both sides to a sequence of 2-by-2 real symmetric matrices, defined by the elements of the vectors x, y and z. For i = 1,2,...,n
 
   ( x(i)  z(i) ) := (  c(i)  s(i) ) ( x(i)  z(i) ) ( c(i) -s(i) )
   ( z(i)  y(i) )    ( -s(i)  c(i) ) ( z(i)  y(i) ) ( s(i)  c(i) )
 

ARGUMENTS

N (input) INTEGER
The number of plane rotations to be applied.

X (input/output) REAL array,
dimension (1+(N-1)∗INCX) The vector x.

Y (input/output) REAL array,
dimension (1+(N-1)∗INCX) The vector y.

Z (input/output) REAL array,
dimension (1+(N-1)∗INCX) The vector z.

INCX (input) INTEGER
The increment between elements of X, Y and Z. INCX > 0.

C (input) REAL array, dimension (1+(N-1)∗INCC)
The cosines of the plane rotations.

S (input) REAL array, dimension (1+(N-1)∗INCC)
The sines of the plane rotations.

INCC (input) INTEGER
The increment between elements of C and S. INCC > 0.

SunOS 5.0  —  Last change: 10 Dec 1998