Previous: spttrs Up: ../lapack-s.html Next: ssbev

srscl

 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( * )

 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 component
              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 vec-
              tor SX.  > 0:  SX(1) = X(1) and SX(1+(i-1)*INCX) =
              x(i),     1< i<= n
              < 0:  SX(1) = X(n) and SX(1+(i-1)*INCX) = x(n-i+1),
              1< i<= n