flash_v2: packages/language/c/libm/current/include/math.h annotate

annotate packages/language/c/libm/current/include/math.h @ 1777:c16341b1bac6 default tip

* Added execute permissions to files missed in conversion from CVS

author	alexs
date	Mon, 12 Oct 2009 02:26:09 +0100
parents	d2c90368aeef
children

rev	line source
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	1 #ifndef CYGONCE_LIBM_MATH_H
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	2 #define CYGONCE_LIBM_MATH_H
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	3 //===========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	4 //
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	5 // math.h
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	6 //
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	7 // Standard mathematical functions conforming to ANSI and other standards
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	8 //
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	9 //===========================================================================
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	10 //####ECOSGPLCOPYRIGHTBEGIN####
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	11 // -------------------------------------------
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	12 // This file is part of eCos, the Embedded Configurable Operating System.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	13 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	14 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	15 // eCos is free software; you can redistribute it and/or modify it under
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	16 // the terms of the GNU General Public License as published by the Free
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	17 // Software Foundation; either version 2 or (at your option) any later version.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	18 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	19 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	20 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	21 // FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	22 // for more details.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	23 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	24 // You should have received a copy of the GNU General Public License along
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	25 // with eCos; if not, write to the Free Software Foundation, Inc.,
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	26 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	27 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	28 // As a special exception, if other files instantiate templates or use macros
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	29 // or inline functions from this file, or you compile this file and link it
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	30 // with other works to produce a work based on this file, this file does not
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	31 // by itself cause the resulting work to be covered by the GNU General Public
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	32 // License. However the source code for this file must still be made available
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	33 // in accordance with section (3) of the GNU General Public License.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	34 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	35 // This exception does not invalidate any other reasons why a work based on
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	36 // this file might be covered by the GNU General Public License.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	37 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	38 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
210 d2c90368aeef Merge from eCos master repository on 2002-05-23-21:39:14-BST jlarmour parents: 208 diff changeset	39 // at http://sources.redhat.com/ecos/ecos-license/
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	40 // -------------------------------------------
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	41 //####ECOSGPLCOPYRIGHTEND####
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	42 //===========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	43 //#####DESCRIPTIONBEGIN####
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	44 //
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	45 // Author(s): jlarmour
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	46 // Contributors: jlarmour
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	47 // Date: 1998-02-13
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	48 // Purpose:
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	49 // Description: Standard mathematical functions. These can be
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	50 // configured to conform to ANSI section 7.5. There are also
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	51 // a number of extensions conforming to IEEE-754 and behaviours
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	52 // compatible with other standards
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	53 // Usage: #include <math.h>
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	54 //
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	55 //####DESCRIPTIONEND####
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	56 //
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	57 //===========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	58
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	59 // CONFIGURATION
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	60
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	61 #include <pkgconf/libm.h> // Configuration header
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	62
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	63 // Include the Math library?
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	64 #ifdef CYGPKG_LIBM
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	65
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	66 // INCLUDES
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	67
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	68 #include <cyg/infra/cyg_type.h> // Common type definitions and support
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	69 #include <float.h> // Properties of FP representation on this
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	70 // platform
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	71 #include <sys/ieeefp.h> // Cyg_libm_ieee_double_shape_type
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	72
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	73 // CONSTANT DEFINITIONS
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	74
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	75
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	76 // HUGE_VAL is a positive double (not necessarily representable as a float)
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	77 // representing infinity as specified in ANSI 7.5. cyg_libm_infinity is
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	78 // defined further down
126 518f42066aba Merge from eCos master repository on 2000-09-19-06:25:26-BST jlarmour parents: 119 diff changeset	79 #define HUGE_VAL (cyg_libm_infinity.value)
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	80
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	81
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	82 #ifndef CYGSYM_LIBM_NO_XOPEN_SVID_NAMESPACE_POLLUTION
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	83 // HUGE is defined in System V Interface Definition 3 (SVID3) as the largest
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	84 // finite single precision number
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	85 #define HUGE FLT_MAX // from float.h
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	86
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	87
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	88 // Values used in the type field of struct exception below
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	89
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	90 #define DOMAIN 1
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	91 #define SING 2
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	92 #define OVERFLOW 3
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	93 #define UNDERFLOW 4
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	94 #define TLOSS 5
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	95 #define PLOSS 6
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	96
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	97
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	98 // TYPE DEFINITIONS
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	99
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	100 // Things required to support matherr() ( see comments in <pkgconf/libm.h>)
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	101
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	102 struct exception {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	103 int type; // One of DOMAIN, SING, OVERFLOW, UNDERFLOW, TLOSS, PLOSS
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	104 char *name; // Name of the function generating the exception
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	105 double arg1; // First argument to the function
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	106 double arg2; // Second argument to the function
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	107 double retval; // Value to be returned - can be altered by matherr()
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	108 };
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	109
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	110 #endif // ifndef CYGSYM_LIBM_NO_XOPEN_SVID_NAMESPACE_POLLUTION
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	111
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	112
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	113 // GLOBALS
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	114
126 518f42066aba Merge from eCos master repository on 2000-09-19-06:25:26-BST jlarmour parents: 119 diff changeset	115 externC const Cyg_libm_ieee_double_shape_type cyg_libm_infinity;
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	116
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	117 //===========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	118 // FUNCTION PROTOTYPES
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	119
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	120 // Functions not part of a standard
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	121
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	122 // This retrieves a pointer to the current compatibility mode of the Math
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	123 // library. See <pkgconf/libm.h> for the definition of Cyg_libm_compat_t
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	124
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	125 #ifdef CYGSEM_LIBM_THREAD_SAFE_COMPAT_MODE
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	126
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	127 externC Cyg_libm_compat_t
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	128 cyg_libm_get_compat_mode( void );
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	129
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	130 externC Cyg_libm_compat_t
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	131 cyg_libm_set_compat_mode( Cyg_libm_compat_t );
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	132
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	133 #else
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	134
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	135 externC Cyg_libm_compat_t cygvar_libm_compat_mode;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	136
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	137 // Defined as static inline as it is unlikely that anyone wants to take the
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	138 // address of these functions.
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	139 //
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	140 // This returns the current compatibility mode
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	141
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	142 static inline Cyg_libm_compat_t
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	143 cyg_libm_get_compat_mode( void )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	144 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	145 return cygvar_libm_compat_mode;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	146 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	147
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	148 // This sets the compatibility mode, and returns the previous mode
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	149 static inline Cyg_libm_compat_t
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	150 cyg_libm_set_compat_mode( Cyg_libm_compat_t math_compat_mode)
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	151 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	152 Cyg_libm_compat_t oldmode;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	153
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	154 oldmode = cygvar_libm_compat_mode;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	155 cygvar_libm_compat_mode = math_compat_mode;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	156 return oldmode;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	157 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	158
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	159 #endif // ifdef CYGSEM_LIBM_THREAD_SAFE_COMPAT_MODE
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	160
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	161 #ifdef CYGSEM_LIBM_THREAD_SAFE_GAMMA_FUNCTIONS
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	162
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	163 // FIXME: these need to be documented and signgam mentioned as non-ISO
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	164 // This returns the address of the signgam variable used by the gamma*() and
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	165 // lgamma*() functions
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	166 externC int *
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	167 cyg_libm_get_signgam_p( void );
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	168
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	169 #define signgam (*cyg_libm_get_signgam_p())
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	170
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	171 #else
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	172
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	173 externC int signgam;
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	174
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	175 #endif // ifdef CYGSEM_LIBM_THREAD_SAFE_GAMMA_FUNCTIONS
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	176
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	177 //===========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	178 // Standard ANSI functions. Angles are always in radians
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	179
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	180 // Trigonometric functions - ANSI 7.5.2
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	181
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	182 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	183 acos( double ); // arc cosine i.e. inverse cos
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	184
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	185 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	186 asin( double ); // arc sine i.e. inverse sin
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	187
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	188 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	189 atan( double ); // arc tan i.e. inverse tan
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	190
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	191 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	192 atan2( double, double ); // arc tan of (first arg/second arg) using signs
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	193 // of args to determine quadrant
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	194
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	195 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	196 cos( double ); // cosine
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	197
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	198 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	199 sin( double ); // sine
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	200
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	201 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	202 tan( double ); // tangent
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	203
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	204 // Hyperbolic functions - ANSI 7.5.3
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	205
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	206 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	207 cosh( double ); // hyperbolic cosine
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	208
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	209 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	210 sinh( double ); // hyperbolic sine
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	211
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	212 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	213 tanh( double ); // hyperbolic tangent
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	214
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	215 // Exponential and Logarithmic Functions - ANSI 7.5.4
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	216
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	217 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	218 exp( double ); // exponent
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	219
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	220 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	221 frexp( double, int * ); // break number into normalized fraction (returned)
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	222 // and integral power of 2 (second arg)
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	223
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	224 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	225 ldexp( double, int ); // multiples number by integral power of 2
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	226
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	227 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	228 log( double ); // natural logarithm
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	229
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	230 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	231 log10( double ); // base ten logarithm
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	232
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	233 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	234 modf( double, double * ); // break number into integral and fractional
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	235 // parts, each of which has same sign as arg.
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	236 // It returns signed fractional part, and
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	237 // puts integral part in second arg
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	238
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	239 // Power Functions - ANSI 7.5.5
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	240
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	241 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	242 pow( double, double ); // (1st arg) to the power of (2nd arg)
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	243
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	244 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	245 sqrt( double ); // square root
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	246
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	247 // Nearest integer, absolute value and remainder functions - ANSI 7.5.6
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	248
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	249 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	250 ceil( double ); // smallest integer >= arg
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	251
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	252 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	253 fabs( double ); // absolute value
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	254
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	255 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	256 floor( double ); // largest integer <= arg
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	257
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	258 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	259 fmod( double, double ); // remainder of (1st arg)/(2nd arg)
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	260
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	261 //===========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	262 // Other standard functions
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	263
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	264 #ifndef CYGSYM_LIBM_NO_XOPEN_SVID_NAMESPACE_POLLUTION
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	265 externC int
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	266 matherr( struct exception * ); // User-overridable error handling - see
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	267 #endif // <pkgconf/libm.h> for a discussion
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	268
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	269 // FIXME: from here needs to be documented and mentioned as non-ISO
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	270 // Arc Hyperbolic trigonometric functions
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	271
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	272 externC double
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	273 acosh( double ); // Arc hyperbolic cos i.e. inverse cosh
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	274
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	275 externC double
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	276 asinh( double ); // Arc hyperbolic sin i.e. inverse sinh
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	277
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	278 externC double
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	279 atanh( double ); // Arc hyperbolic tan i.e. inverse tanh
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	280
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	281 // Error functions
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	282
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	283 externC double // Error function, such that
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	284 erf( double ); // erf(x) = 2/sqrt(pi) * integral from
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	285 // 0 to x of e(-t2) dt
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	286
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	287 externC double // Complementary error function - simply
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	288 erfc( double ); // 1.0 - erf(x)
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	289
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	290 // Gamma functions
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	291
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	292 externC double // Logarithm of the absolute value of the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	293 lgamma( double ); // gamma function of the argument. The
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	294 // integer signgam is used to store the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	295 // sign of the gamma function of the arg
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	296
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	297 externC double
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	298 lgamma_r( double, int * ); // Re-entrant version of the above, where
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	299 // the user passes the location of signgam
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	300 // as the second argument
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	301
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	302 externC double // Identical to lgamma()!
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	303 gamma( double ); // The reasons for this are historical,
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	304 // and may be changed in future standards
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	305 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	306 // To get the real gamma function, you should
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	307 // use: l=lgamma(x); g=signgam*exp(l);
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	308 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	309 // Do not just do signgam*exp(lgamma(x))
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	310 // as lgamma() modifies signgam
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	311
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	312 externC double
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	313 gamma_r( double, int * ); // Identical to lgamma_r(). See above.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	314
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	315
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	316 // Bessel functions
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	317
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	318 externC double // Zero-th order Bessel function of the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	319 j0( double ); // first kind at the ordinate of the argument
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	320
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	321 externC double // First-order Bessel function of the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	322 j1( double ); // first kind at the ordinate of the argument
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	323
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	324 externC double // Bessel function of the first kind of the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	325 jn( int, double ); // order of the first argument at the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	326 // ordinate of the second argument
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	327
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	328 externC double // Zero-th order Bessel function of the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	329 y0( double ); // second kind at the ordinate of the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	330 // argument
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	331
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	332 externC double // First-order Bessel function of the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	333 y1( double ); // second kind at the ordinate of the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	334 // argument
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	335
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	336 externC double // Bessel function of the second kind of the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	337 yn( int, double ); // order of the first argument at the
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	338 // ordinate of the second argument
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	339
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	340 // scalb*()
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	341
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	342 externC double // scalbn(x,n) returns x(2*n)
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	343 scalbn( double, int );
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	344
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	345 #ifdef CYGFUN_LIBM_SVID3_scalb
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	346
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	347 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	348 scalb( double, double ); // as above except n is a floating point arg
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	349
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	350 #else
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	351 externC double
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	352 scalb( double, int ); // as scalbn()
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	353
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	354 #endif // ifdef CYGFUN_LIBM_SVID3_scalb
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	355
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	356 // And the rest
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	357
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	358 externC double
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	359 cbrt( double ); // Cube Root
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	360
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	361 externC double // hypotenuse function, defined such that:
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	362 hypot( double, double ); // hypot(x,y)==sqrt(x2 + y2)
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	363
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	364 externC int // whether the argument is NaN
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	365 isnan( double );
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	366
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	367 externC int
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	368 finite( double ); // whether the argument is finite
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	369
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	370 externC double // logb returns the binary exponent of its
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	371 logb( double ); // argument as an integral value
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	372 // This is not recommended - use ilogb
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	373 // instead
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	374
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	375 externC int // As for logb, but has the more correct
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	376 ilogb( double ); // return value type of int
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	377
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	378
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	379 externC double // nextafter(x,y) returns the next
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	380 nextafter( double, double ); // representable floating point number
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	381 // adjacent to x in the direction of y
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	382 // i.e. the next greater FP if y>x, the next
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	383 // less FP if y<x, or just x if y==x
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	384
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	385 externC double // remainder(x,y) returns the remainder
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	386 remainder( double, double ); // when x is divided by y
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	387
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	388 externC double // IEEE Test Vector
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	389 significand( double ); // significand(x) computes:
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	390 // scalb(x, (double) -ilogb(x))
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	391
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	392 //===========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	393 // Non-standard functions
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	394
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	395 externC double // copysign(x,y) returns a number with
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	396 copysign ( double, double ); // the absolute value of x and the sign of y
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	397
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	398 externC double // rounds to an integer according to the
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	399 rint( double ); // current rounding mode
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	400
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	401
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	402 // BSD functions
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	403
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	404 externC double // expm1(x) returns the equivalent of
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	405 expm1( double ); // (exp(x) - 1) but more accurately when
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	406 // x tends to zero
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	407
208 e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	408 externC double // log1p(x) returns the equivalent of
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	409 log1p( double ); // log(1+x) but more accurately when
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 126 diff changeset	410 // x tends to zero
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	411
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	412 #endif // ifdef CYGPKG_LIBM
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	413
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	414 #endif // CYGONCE_LIBM_MATH_H multiple inclusion protection
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	415
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	416 // EOF math.h

Mercurial > flash_v2

annotate packages/language/c/libm/current/include/math.h @ 1777:c16341b1bac6 default tip