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

   1: double r_atn2(x,y)
   2: float *x, *y;
   3: {
   4: double atan2();
   5: return( atan2(*x,*y) );
   6: }

Defined functions