V7/usr/src/libF77/d_abs.c
Find at most
5
10
20
50
100
500
related files.
including files from this version of Unix.
double d_abs(x) double *x; { if(*x >= 0) return(*x); return(- *x); }