Bell 32V development
[unix-history] / usr / src / libF77 / r_log.c
CommitLineData
0c9e74ab
TL
1double r_log(x)
2float *x;
3{
4double log();
5return( log(*x) );
6}