UNIX 7th Ed. - /usr/src/libF77/r_log.c

   1: double r_log(x)
   2: float *x;
   3: {
   4: double log();
   5: return( log(*x) );
   6: }

Defined functions