1 /* wf_atan2.c -- float version of w_atan2.c. 2 * Conversion to float by Ian Lance Taylor, Cygnus Support, ian (at) cygnus.com. 3 */ 4 5 /* 6 * ==================================================== 7 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 8 * 9 * Developed at SunPro, a Sun Microsystems, Inc. business. 10 * Permission to use, copy, modify, and distribute this 11 * software is freely granted, provided that this notice 12 * is preserved. 13 * ==================================================== 14 * 15 */ 16 17 /* 18 * wrapper atan2f(y,x) 19 */ 20 21 #include "fdlibm.h" 22 #include <errno.h> 23 24 #ifdef __STDC__ 25 float atan2f(float y, float x) /* wrapper atan2f */ 26 #else 27 float atan2f(y,x) /* wrapper atan2 */ 28 float y,x; 29 #endif 30 { 31 return __ieee754_atan2f(y,x); 32 } 33 34 #ifdef _DOUBLE_IS_32BITS 35 36 #ifdef __STDC__ 37 double atan2(double y, double x) 38 #else 39 double atan2(y,x) 40 double y,x; 41 #endif 42 { 43 return (double) atan2f((float) y, (float) x); 44 } 45 46 #endif /* defined(_DOUBLE_IS_32BITS) */ 47
