VEC_$DREC1C Domain/OS VEC_$DREC1C
NAME
vec_$drec1c - calculate first-order linear recurrence of double-precision
vector with constant coefficient
SYNOPSIS (C)
#include <apollo/base.h>
#include <apollo/vec.h>
void vec_$drec1c(
double *start_vec,
long int &count,
double &mult_constant,
double *result_vec)
SYNOPSIS (Pascal)
%include '/sys/ins/base.ins.pas';
%include '/sys/ins/vec.ins.pas';
procedure vec_$drec1c(
in start_vec: univ vec_$double_vector;
in count: integer32;
in mult_constant: real;
var result_vec: univ vec_$double_vector);
SYNOPSIS (FORTRAN)
%include '/sys/ins/base.ins.ftn'
%include '/sys/ins/vec.ins.ftn'
parameter (nvec = 10)
real*8 start_vec(nvec), result_vec(nvec), mult_constant
integer*4 count
call vec_$drec1c(start_vec, count, mult_constant, result_vec)
DESCRIPTION
Vec_$drec1c calculates a first-order linear recurrence with constant
coefficient based on start_vec. It differs from vec_$rec1c in that the
vectors being handled are double-precision floating point.
This routine reads the first entry in the array result_vec; it then
writes count entries into result_vec based on the following formula:
For each integer I such that 1 <= I <= count,
result_vec(I+1) = start_vec(I) + (mult_constant x result_vec(I))
Notice that result_vec is used both for input and output, and that it
must be large enough to hold count + 1 entries.
start_vec
An input vector.
mult_constant
A scalar multiplier.
count
The number of elements to be operated on.
result_vec
The vector containing one input value and the result of the
recurrence calculation.
NOTES
When vec_$drec1c is used to operate on matrixes in C and Pascal,
start_vec and result_vec are row vectors; in FORTRAN, they are column
vectors.
As in all the vec_$ calls, the result array must not overlap any of the
input arrays; the result array may be identical to an input, but must not
contain any smaller subset of an input. Because of pipelining, using
overlapping input and output arrays may cause incorrect results.
SEE ALSO
vec_$rec1, vec_$rec1n, vec_$rec1r, vec_$rec1c, vec_$rec1cr, vec_$rec1c_i,
vec_$drec1c_i, vec_$irec1c, vec_$irec1c_i, vec_$irec1c16,
vec_$irec1c16_i.