1 /* @(#)s_pow10.c 5.1 93/09/24 */
2 /* Modification from s_exp10.c 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 	<<pow10>>, <<pow10f>>---base 10 power functions
18 INDEX
19 	pow10
20 INDEX
21 	pow10f
22 
23 ANSI_SYNOPSIS
24 	#include <math.h>
25 	double pow10(double <[x]>);
26 	float pow10f(float <[x]>);
27 
28 TRAD_SYNOPSIS
29 	#include <math.h>
30 	double pow10(<[x]>);
31 	double <[x]>;
32 
33 	float pow10f(<[x]>);
34 	float <[x]>;
35 
36 DESCRIPTION
37 	<<pow10>> and <<pow10f>> calculate 10 ^ <[x]>, that is,
38 	@ifnottex
39 	10 raised to the power <[x]>.
40 	@end ifnottex
41 	@tex
42 	$10^x$
43 	@end tex
44 
45 	You can use the (non-ANSI) function <<matherr>> to specify
46 	error handling for these functions.
47 
48 RETURNS
49 	On success, <<pow10>> and <<pow10f>> return the calculated value.
50 	If the result underflows, the returned value is <<0>>.  If the
51 	result overflows, the returned value is <<HUGE_VAL>>.  In
52 	either case, <<errno>> is set to <<ERANGE>>.
53 
54 PORTABILITY
55 	<<pow10>> and <<pow10f>> are GNU extensions.
56 */
57 
58 /*
59  * wrapper pow10(x)
60  */
61 
62 #undef pow10
63 #include "fdlibm.h"
64 #include <errno.h>
65 #include <math.h>
66 
67 #ifndef _DOUBLE_IS_32BITS
68 
69 #ifdef __STDC__
pow10(double x)70 	double pow10(double x)		/* wrapper pow10 */
71 #else
72 	double pow10(x)			/* wrapper pow10 */
73 	double x;
74 #endif
75 {
76   return pow(10.0, x);
77 }
78 
79 #endif /* defined(_DOUBLE_IS_32BITS) */
80