Listing 2 A clearer version of Listing 1

void vaddosb(vect_in1,incr_in1,vect_in2,incr_in2,

vect_out,incr_out,vect_length)
float *vect_in1, *vect_in2, *vect_out;
int vect_length,incr_in1,incr_in2, incr_out;

{
       int i;
       
       for(i=0;i<vect_length;++i)
          vect_out [i*incr_out] =
          (vect_in1[i*incr_in1] + vect_in2[i*incr_in2])
          / (vect_in1[i*incr_in1]-
vect_in2[i*incr_in2]);
}

/* End of File */