home *** CD-ROM | disk | FTP | other *** search
/ Power Programming / powerprogramming1994.iso / progtool / borland / jnfb88.arc / CFLOAT.ARC / DOT2.C < prev    next >
Text File  |  1987-06-23  |  158b  |  10 lines
  1. /* Listing 5: */
  2.  
  3. double dot(int n, double *x, double *y)
  4. {
  5.      double sum = 0.;
  6.      while (n--)
  7.           sum += *x++ * *y++;
  8.      return sum;
  9. }
  10.