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

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

Defined functions