]> CyberLeo.Net >> Repos - FreeBSD/releng/7.2.git/blob - contrib/libf2c/libF77/d_prod.c
Create releng/7.2 from stable/7 in preparation for 7.2-RELEASE.
[FreeBSD/releng/7.2.git] / contrib / libf2c / libF77 / d_prod.c
1 #include "f2c.h"
2
3 double
4 d_prod (real * x, real * y)
5 {
6   return ((*x) * (*y));
7 }