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

NAME
     srscl - multiply an n-element real  vector  x  by  the  real
     scalar 1/a

SYNOPSIS
     SUBROUTINE SRSCL( N, SA, SX, INCX )

     INTEGER INCX, N

     REAL SA

     REAL SX( * )



     #include <sunperf.h>

     void srscl(int n, float sa, float *sx, int incx) ;

PURPOSE
     SRSCL multiplies an n-element real  vector  x  by  the  real
     scalar  1/a.   This is done without overflow or underflow as
     long as
     the final result x/a does not overflow or underflow.


ARGUMENTS
     N         (input) INTEGER
               The number of components of the vector x.

     SA        (input) REAL
               The scalar a which is used  to  divide  each  com-
               ponent  of  x.  SA must be >= 0, or the subroutine
               will divide by zero.

     SX        (input/output) REAL array, dimension
               (1+(N-1)*abs(INCX)) The n-element vector x.

     INCX      (input) INTEGER
               The increment between  successive  values  of  the
               vector  SX.   >  0:   SX(1)  =  X(1)  and SX(1+(i-
               1)*INCX) = x(i),     1< i<= n

Партнёры:

Хостинг: