RECPS (3sciport)

Solves a partial sums problem

SYNOPSIS

  Call RECPS( n, y, incy, x, incx )

FBARGUMENTS

  n               Integer.
                  The length of the linear recurrence

  y               Real vector.
                  The real output vector of length n.

  incy            Integer.
                  The increment between elements of vector y.

  x               Real vector.
                  The real input vector of length n.

  incx            Integer.
                  The increment between elements of vector x.

DESCRIPTION

  RECPS solves a partial sums problem as follows:

          Y(1) = X(1)
          DO I = 2,N
             Y(I) = Y(I-1) + X(I)
          ENDDO

  For equations and other information, see Volume 3: UNICOS Math and
  Scientific Library Reference Manual SR-2081 7.0, Cray Research, Inc.