1/*	$NetBSD: w_acos.c,v 1.11 2024/06/09 13:35:38 riastradh Exp $	*/
2
3/* @(#)w_acos.c 5.1 93/09/24 */
4/*
5 * ====================================================
6 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
7 *
8 * Developed at SunPro, a Sun Microsystems, Inc. business.
9 * Permission to use, copy, modify, and distribute this
10 * software is freely granted, provided that this notice
11 * is preserved.
12 * ====================================================
13 */
14
15#include <sys/cdefs.h>
16#if defined(LIBM_SCCS) && !defined(lint)
17__RCSID("$NetBSD: w_acos.c,v 1.11 2024/06/09 13:35:38 riastradh Exp $");
18#endif
19
20/*
21 * wrap_acos(x)
22 */
23
24#include "namespace.h"
25
26#include "math.h"
27#include "math_private.h"
28
29#ifndef __HAVE_LONG_DOUBLE
30__weak_alias(acosl, _acosl)
31__strong_alias(_acosl, _acos)
32#endif
33
34__weak_alias(acos, _acos)
35
36double
37acos(double x)		/* wrapper acos */
38{
39#ifdef _IEEE_LIBM
40	return __ieee754_acos(x);
41#else
42	double z;
43	z = __ieee754_acos(x);
44	if(_LIB_VERSION == _IEEE_ || isnan(x)) return z;
45	if(fabs(x)>1.0) {
46	        return __kernel_standard(x,x,1); /* acos(|x|>1) */
47	} else
48	    return z;
49#endif
50}
51