d_atn2 X
1: /* 2: * "@(#)d_atn2.c 1.1" 3: */ 4: 5: double d_atn2(x,y) 6: double *x, *y; 7: { 8: double atan2(); 9: return( atan2(*x,*y) ); 10: }