Museum

Home

Lab Overview

Retrotechnology Articles

⇒ Online Manual

Media Vault

Software Library

Restoration Projects

Artifacts Sought

VEC_$IREC1R16_I                   Domain/OS                    VEC_$IREC1R16_I


NAME
     vec_$irec1r16_i - function returning first-order linear recurrence of
     16-bit integer vector

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

     short int vec_$irec1r16_i(
          short int *start_vec,
          long int &start_inc,
          short int *vec_2,
          long int &vec2_inc,
          long int &count,
          short int &init_value)

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

     function vec_$irec1r16_i(
          in start_vec: univ vec_$integer16_vector;
          in start_inc: integer32;
          in vec_2: univ vec_$integer16_vector;
          in vec2_inc: integer32;
          in count: integer32;
          in init_value: integer16):integer16;

SYNOPSIS (FORTRAN)
     %include '/sys/ins/base.ins.ftn'
     %include '/sys/ins/vec.ins.ftn'

           parameter (nvec = 10)

           integer*2 start_vec(nvec), vec_2(nvec), init_value, return_value
           integer*4 count
           integer*4 start_inc, vec2_inc

           return_value = vec_$irec1r16_i(start_vec, start_inc,
          & vec_2, vec2_inc, count, init_value)

DESCRIPTION
     Vec_$irec1r16_i calculates a first-order linear recurrence based on
     start_vec, with coefficients taken from vec_2.  Unlike vec_$rec1_i, it
     does not produce an output vector.  Instead, it calculates the value of
     each entry in a temporary output vector, then returns the value of the
     last entry.  It differs from vec_$rec1r_i in that the vectors being han-
     dled contain 16-bit integers.

     This call, like all vec_$ calls ending in _i, takes a set of extra stride
     arguments, one for every vector argument.  The stride arguments determine
     which elements in the array are actually processed.  For instance, if the
     stride for a particular array is set to 3, every third element in the
     array will be processed by the routine.  The stride arguments need not be
     identical.  If all stride arguments are set to 1, this call behaves
     exactly like the version without the _i in its name.

     This routine sets its return value to init_value; it then performs a
     recurrence calculation as follows:

     Initialize the counter variables J and K to the low indices of the arrays
     start_vec and vec_2.  In Fortran, the low index will be 1;  in C, it will
     be 0; in Pascal, it varies depending on the declaration.
     Execute the following equations count times:
     return_value = start_vec(J) + (vec_2(K) x return_value)
     J = J + start_inc
     K = K + vec2_inc

     start_vec
          An input vector.

     start_inc
          The stride for start_vec.

     vec_2
          An input vector.

     vec2_inc
          The stride for vec2_vec.

     count
          The number of elements to be operated on.

     init_value
          The initial value on which the recurrence calculation is based.

NOTES
     When vec_$irec1r16_i is used to operate on matrixes in C and Pascal,
     start_vec and vec_2  are row vectors; in FORTRAN, they are column vec-
     tors.

     Vec_$irec1r16_i, like all 16-bit integer routines, performs poorly when
     compared to the 32-bit integer routines.  Its use should be avoided wher-
     ever possible, especially on high-performance workstations.

SEE ALSO
     vec_$rec1, vec_$rec1c, vec_$rec1n, vec_$rec1r, vec_$rec1cr, vec_$rec1r_i,
     vec_$drec1r, vec_$drec1r_i, vec_$irec1r, vec_$irec1r_i, vec_$irec1r16.

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