home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / listings / v_10_09 / 1009070a < prev    next >
Text File  |  1992-05-11  |  192b  |  12 lines
  1.  
  2. short calculate_net(net, N, w, x)
  3.    short *net, N, w[], x[];
  4. {
  5.    short i;
  6.    *net = 0;
  7.    for(i=0; i<N+1; i++){
  8.       *net = *net + w[i]*x[i];
  9.    }
  10. }  /* ends calculate_net */
  11.  
  12.