V7/usr/src/libF77/r_cos.c
Find at most
5
10
20
50
100
500
related files.
including files from this version of Unix.
double r_cos(x) float *x; { double cos(); return( cos(*x) ); }