Museum

Home

Lab Overview

Retrotechnology Articles

⇒ Online Manual

Media Vault

Software Library

Restoration Projects

Artifacts Sought

VEC_$ABS_I                        Domain/OS                         VEC_$ABS_I


NAME
     vec_$abs_i - take the absolute value of the elements in a single-
     precision vector

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

     void vec_$abs_i(
          float *start_vec,
          long int &start_inc,
          long int &length,
          float *result_vec,
          long int &result_inc)

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

     procedure vec_$abs_i(
          in start_vec: univ vec_$real_vector;
          in start_inc: integer32;
          in length: integer32;
          out result_vec: univ vec_$real_vector;
          in result_inc: integer32);

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

           parameter (nvec = 10)

           real start_vec(nvec), result_vec(nvec)
           integer*4 length
           integer*4 start_inc, result_inc

           call vec_$abs_i(start_vec, start_inc, length,
          & result_vec, result_inc)

DESCRIPTION
     Vec_$abs_i places the absolute value of the entries in the vector
     start_vec into result_vec.

     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.

     The calculation performed is as follows:  Initialize the counter vari-
     ables J and L to the low indices of the arrays start_vec and result_vec.
     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 length times:
     result_vec(L) = |start_vec(J)|
     J = J + start_inc
|
| L = L + result_inc start_vec The vector whose absolute value is required. start_inc The stride for start_vec. length The number of elements to be operated on; normally the same as the number of elements in the vectors. result_vec The absolute value of the vector start_vec. result_inc The stride for result_vec. NOTES When vec_$abs_i 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 subset of it. Because of pipelining, using overlapping input and output arrays may cause incorrect results. SEE ALSO vec_$neg, vec_$abs, vec_$dabs, vec_$dabs_i, vec_$iabs, vec_$iabs_i, vec_$iabs16, vec_$iabs16_i.

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