BSD 4.2
/* * "@(#)d_prod.c 1.1" */ double d_prod(x,y) float *x, *y; { return( (*x) * (*y) ); }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.