1 /* @(#)s_exp10.c 5.1 93/09/24 */
2 /* Modified from s_exp2.c by Yaakov Selkowitz 2007.  */
3 
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 /*
16 FUNCTION
17 	<<exp10>>, <<exp10f>>---exponential, base 10
18 INDEX
19 	exp10
20 INDEX
21 	exp10f
22 
23 SYNOPSIS
24 	#include <math.h>
25 	double exp10(double <[x]>);
26 	float exp10f(float <[x]>);
27 
28 DESCRIPTION
29 	<<exp10>> and <<exp10f>> calculate 10 ^ <[x]>, that is,
30 	@ifnottex
31 	10 raised to the power <[x]>.
32 	@end ifnottex
33 	@tex
34 	$10^x$
35 	@end tex
36 
37 RETURNS
38 	On success, <<exp10>> and <<exp10f>> return the calculated value.
39 	If the result underflows, the returned value is <<0>>.  If the
40 	result overflows, the returned value is <<HUGE_VAL>>.  In
41 	either case, <<errno>> is set to <<ERANGE>>.
42 
43 PORTABILITY
44 	<<exp10>> and <<exp10f>> are GNU extensions.
45 
46 */
47 
48 /*
49  * wrapper exp10(x)
50  */
51 
52 #undef exp10
53 #include "fdlibm.h"
54 #include <errno.h>
55 #include <math.h>
56 
57 #ifdef _NEED_FLOAT64
58 
59 __float64
exp1064(__float64 x)60 exp1064(__float64 x)		/* wrapper exp10 */
61 {
62   return _pow64(_F_64(10.0), x);
63 }
64 
65 _MATH_ALIAS_d_d(exp10);
66 
67 #endif /* _NEED_FLOAT64 */
68