home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / listings / v_11_09 / 1109092a < prev    next >
Text File  |  1993-07-08  |  845b  |  37 lines
  1. void add(int count, float *a, float *b, float *result)
  2. { /* fortran */
  3.         int i;
  4.         for(i=0;i<count;++i)
  5.                 result[i] = a[i] +b[i];
  6. }
  7.  
  8. void add(int count, float *a, float *b, float *result)
  9. { /* UDI */
  10.         while(count--)
  11.                 *result++ = *a++ + *b++;
  12. }
  13.  
  14. void add(int count, float *a, float *b, float *result)
  15. { /* Csound */
  16.         do
  17.         {
  18.                 *result++ = *a++ + *b++;
  19.         }while(--count);
  20. }
  21.  
  22. void add(int count, float *a, float *b, float *result)
  23. { /* Resound */
  24.         float *end = result+count;
  25.         while(result<end)
  26.         {
  27.                 *result++ = *a++ + *b++;
  28.         }
  29. }
  30.  
  31. void add(int count, float *a, float *b, float *result)
  32. { /* Ptolemy */
  33.         int i;
  34.         for(i=count-1;i >=0;--i)
  35.                 result[i] = a[i] +b[i];
  36. }
  37.