[ новости /+++ | форум | теги | ]

NAME
     slargv - generate a vector of real plane  rotations,  deter-
     mined by elements of the real vectors x and y

SYNOPSIS
     SUBROUTINE SLARGV( N, X, INCX, Y, INCY, C, INCC )

     INTEGER INCC, INCX, INCY, N

     REAL C( * ), X( * ), Y( * )



     #include <sunperf.h>

     void slargv(int n, float *sx, int incx, float *sy, int incy,
               float *sc, int incc) ;

PURPOSE
     SLARGV generates a vector of real  plane  rotations,  deter-
     mined  by  elements  of  the  real  vectors x and y. For i =
     1,2,...,n

        (  c(i)  s(i) ) ( x(i) ) = ( a(i) )
        ( -s(i)  c(i) ) ( y(i) ) = (   0  )


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

     X         (input/output) REAL array,
               dimension (1+(N-1)*INCX) On entry, the  vector  x.
               On  exit,  x(i)  is  overwritten  by a(i), for i =
               1,...,n.

     INCX      (input) INTEGER
               The increment between elements of X. INCX > 0.

     Y         (input/output) REAL array,
               dimension (1+(N-1)*INCY) On entry, the  vector  y.
               On exit, the sines of the plane rotations.

     INCY      (input) INTEGER
               The increment between elements of Y. INCY > 0.

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

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

Партнёры:

Хостинг: