Museum

Home

Lab Overview

Retrotechnology Articles

⇒ Online Manual

Media Vault

Software Library

Restoration Projects

Artifacts Sought

VEC_$ZERO                         Domain/OS                          VEC_$ZERO


NAME
     vec_$zero - zero a single-precision vector

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

     void vec_$zero(
          float *vector,
          long int &length)

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

     procedure vec_$zero(
          var vector: univ vec_$real_vector;
          in length: integer32);

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

           parameter (nvec = 10)

           real vector(nvec)
           integer*4 length

           call vec_$zero(vector, length)

DESCRIPTION
     Vec_$zero zeros the first length elements of the single-precision vector
     vector.

     In C, the resulting operation is

          for (i = 0; i < length; ++i)
               vector[i] = 0.0;

     In Pascal, the resulting operation is

          for i := 1 to length do
               vector[i] := 0.0;

     In FORTRAN, the resulting operation is

           do 10 i = 1, length
               vec(i) = 0.0
       10  continue

     vector
          The vector to be zeroed.

     length
          The number of elements in vector to zero.

NOTES
     In C and Pascal, vec_$zero zeros row vectors; whereas in FORTRAN, it
     zeros column vectors.

SEE ALSO
     vec_$dzero, vec_$izero, vec_$izero16, vec_$zero_i.

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