1 2/* @(#)e_atan2.c 1.3 95/01/18 */ 3/* 4 * ==================================================== 5 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 6 * 7 * Developed at SunSoft, a Sun Microsystems, Inc. business. 8 * Permission to use, copy, modify, and distribute this 9 * software is freely granted, provided that this notice 10 * is preserved. 11 * ==================================================== 12 * 13 */ 14
| 1 2/* @(#)e_atan2.c 1.3 95/01/18 */ 3/* 4 * ==================================================== 5 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 6 * 7 * Developed at SunSoft, a Sun Microsystems, Inc. business. 8 * Permission to use, copy, modify, and distribute this 9 * software is freely granted, provided that this notice 10 * is preserved. 11 * ==================================================== 12 * 13 */ 14
|
15#ifndef lint 16static char rcsid[] = "$FreeBSD: head/lib/msun/src/e_atan2.c 141296 2005-02-04 18:26:06Z das $"; 17#endif
| 15#include <sys/cdefs.h> 16__FBSDID("$FreeBSD: head/lib/msun/src/e_atan2.c 176451 2008-02-22 02:30:36Z das $");
|
18 19/* __ieee754_atan2(y,x) 20 * Method : 21 * 1. Reduce y to positive by atan2(y,x)=-atan2(-y,x). 22 * 2. Reduce x to positive by (if x and y are unexceptional): 23 * ARG (x+iy) = arctan(y/x) ... if x > 0, 24 * ARG (x+iy) = pi - arctan[y/(-x)] ... if x < 0, 25 *
--- 99 unchanged lines hidden --- | 17 18/* __ieee754_atan2(y,x) 19 * Method : 20 * 1. Reduce y to positive by atan2(y,x)=-atan2(-y,x). 21 * 2. Reduce x to positive by (if x and y are unexceptional): 22 * ARG (x+iy) = arctan(y/x) ... if x > 0, 23 * ARG (x+iy) = pi - arctan[y/(-x)] ... if x < 0, 24 *
--- 99 unchanged lines hidden --- |