Amiga ACS 1998 #4/amigaacscoverdisc1998-041998.iso/utilities/shareware/dev/vbcc/machines/amiga68k/libsrc/math/atan2.c

C/C++ Source or Header | 1997-12-30 | 267 b | 10 lines

#include <math.h>

#define PI 3.14159265358979323846

double atan2(double y,double x)
{ return x>=y?(x>=-y?      atan(y/x):     -PI/2-atan(x/y)):
              (x>=-y? PI/2-atan(x/y):y>=0? PI  +atan(y/x):
                                          -PI  +atan(y/x));
}