Museum

Home

Lab Overview

Retrotechnology Articles

⇒ Online Manual

Media Vault

Software Library

Restoration Projects

Artifacts Sought

VEC_$DREC1                        Domain/OS                         VEC_$DREC1


NAME
     vec_$drec1 - calculate first-order linear recurrence of double-precision
     vector

SYNOPSIS (C)
     #include <apollo/base.h>
     #include <apollo/vec.h>

     void vec_$drec1(
          double *start_vec,
          double *vec_2,
          long int &count,
          double *result_vec)

SYNOPSIS (Pascal)
     %include '/sys/ins/base.ins.pas';
     %include '/sys/ins/vec.ins.pas';

     procedure vec_$drec1(
          in start_vec: univ vec_$double_vector;
          in vec_2: univ vec_$double_vector;
          in count: integer32;
          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), vec_2(nvec)
           integer*4 count

           call vec_$drec1(start_vec, vec_2, count, result_vec)

DESCRIPTION
     Vec_$drec1 calculates a first-order linear recurrence based on start_vec
     and vec_2.  It differs from vec_$rec1 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) + (vec_2(I) 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.

     vec_2
          An input vector.

     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_$drec1 is used to operate on matrixes in C and Pascal,
     start_vec, vec_2, 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_$rec1c, vec_$rec1n, vec_$rec1r, vec_$rec1cr, vec_$rec1_i, vec_$rec1,
     vec_$drec1_i, vec_$irec1, vec_$irec1_i, vec_$irec116, vec_$irec116_i.

Typewritten Software • bear@typewritten.org • Edmonds, WA 98026