glibc/sysdeps/ieee754/dbl-64/mpa.h
Roland McGrath c6c6dd4803 2002-08-20 Brian Youmans <3diff@gnu.org>
* manual/contrib.texi: Removed licenses, added acknowledgements
        for contributions by Intel, IBM, Craig Metz.
        * LICENSES: New file, contains the text of all non-FSF licenses in the
	distribution that require putting the notice in the accompanying
	documentation.
	* README.template, README: Mention LICENSES.

        * sysdeps/mach/hurd/net/if_ppp.h: Replaced CMU license with a
        new one modelled on the modern BSD license, per recent letter
        of permission from CMU.
        * sysdeps/unix/sysv/linux/net/if_ppp.h: Likewise.

        * sysdeps/ieee754/dbl-64/MathLib.h: Changed the copyright holder
        from IBM to FSF, per the recent Software Letter.  Changed the
        distribution terms from GPL to LGPL.

        * sysdeps/ieee754/dbl-64/asincos.tbl: Added FSF copyright and
        copying permission notice (Lesser GPL), per recent IBM Software Letter.
        * sysdeps/ieee754/dbl-64/powtwo.tbl: Likewise.
        * sysdeps/ieee754/dbl-64/root.tbl: Likewise.
        * sysdeps/ieee754/dbl-64/sincos.tbl: Likewise.
        * sysdeps/ieee754/dbl-64/uatan.tbl: Likewise.
        * sysdeps/ieee754/dbl-64/uexp.tbl: Likewise.
        * sysdeps/ieee754/dbl-64/ulog.tbl: Likewise.
        * sysdeps/ieee754/dbl-64/upow.tbl: Likewise.
        * sysdeps/ieee754/dbl-64/utan.tbl: Likewise.

        * sysdeps/ieee754/dbl-64/atnat.h: Changed the copyright holder
	from IBM to FSF, per the recent Software Letter.  Corrected the
	text of the copying permission notice to say Lesser GPL instead
	of GPL in warranty disclaimer paragraph.
        * sysdeps/ieee754/dbl-64/atnat2.h: Likewise.
        * sysdeps/ieee754/dbl-64/branred.h: Likewise.
        * sysdeps/ieee754/dbl-64/dla.h: Likewise.
        * sysdeps/ieee754/dbl-64/doasin.h: Likewise.
        * sysdeps/ieee754/dbl-64/dosincos.h: Likewise.
        * sysdeps/ieee754/dbl-64/mpa.h: Likewise.
        * sysdeps/ieee754/dbl-64/mpa2.h: Likewise.
        * sysdeps/ieee754/dbl-64/mpatan.h: Likewise.
        * sysdeps/ieee754/dbl-64/mpexp.h: Likewise.
        * sysdeps/ieee754/dbl-64/mplog.h: Likewise.
        * sysdeps/ieee754/dbl-64/mpsqrt.h: Likewise.
        * sysdeps/ieee754/dbl-64/mydefs.h: Likewise.
        * sysdeps/ieee754/dbl-64/sincos32.h: Likewise.
        * sysdeps/ieee754/dbl-64/uasncs.h: Likewise.
        * sysdeps/ieee754/dbl-64/uexp.h: Likewise.
        * sysdeps/ieee754/dbl-64/ulog.h: Likewise.
        * sysdeps/ieee754/dbl-64/upow.h: Likewise.
        * sysdeps/ieee754/dbl-64/urem.h: Likewise.
        * sysdeps/ieee754/dbl-64/uroot.h: Likewise.
        * sysdeps/ieee754/dbl-64/usncs.h: Likewise.
        * sysdeps/ieee754/dbl-64/utan.h: Likewise.

        * sysdeps/ieee754/dbl-64/branred.c: Corrected the text of the copying
	permission notice to say Lesser GPL instead of GPL in warranty
	disclaimer paragraph.
        * sysdeps/ieee754/dbl-64/doasin.c: Likewise.
        * sysdeps/ieee754/dbl-64/dosincos.c: Likewise.
        * sysdeps/ieee754/dbl-64/e_asin.c: Likewise.
        * sysdeps/ieee754/dbl-64/e_atan2.c: Likewise.
        * sysdeps/ieee754/dbl-64/e_exp.c: Likewise.
        * sysdeps/ieee754/dbl-64/e_log.c: Likewise.
        * sysdeps/ieee754/dbl-64/e_pow.c: Likewise.
        * sysdeps/ieee754/dbl-64/e_remainder.c: Likewise.
        * sysdeps/ieee754/dbl-64/e_sqrt.c: Likewise.
        * sysdeps/ieee754/dbl-64/halfulp.c: Likewise.
        * sysdeps/ieee754/dbl-64/mpa.c: Likewise.
        * sysdeps/ieee754/dbl-64/mpatan.c: Likewise.
        * sysdeps/ieee754/dbl-64/mpatan2.c: Likewise.
        * sysdeps/ieee754/dbl-64/mpexp.c: Likewise.
        * sysdeps/ieee754/dbl-64/mplog.c: Likewise.
        * sysdeps/ieee754/dbl-64/mpsqrt.c: Likewise.
        * sysdeps/ieee754/dbl-64/mptan.c: Likewise.
        * sysdeps/ieee754/dbl-64/s_atan.c: Likewise.
        * sysdeps/ieee754/dbl-64/s_sin.c: Likewise.
        * sysdeps/ieee754/dbl-64/s_tan.c: Likewise.
        * sysdeps/ieee754/dbl-64/sincos32.c: Likewise.
        * sysdeps/ieee754/dbl-64/slowexp.c: Likewise.
        * sysdeps/ieee754/dbl-64/slowpow.c:  Likewise.
2002-08-20 21:51:55 +00:00

88 lines
4.4 KiB
C

/*
* IBM Accurate Mathematical Library
* Written by International Business Machines Corp.
* Copyright (C) 2001 Free Software Foundation, Inc.
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU Lesser General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/
/************************************************************************/
/* MODULE_NAME: mpa.h */
/* */
/* FUNCTIONS: */
/* mcr */
/* acr */
/* cr */
/* cpy */
/* cpymn */
/* mp_dbl */
/* dbl_mp */
/* add */
/* sub */
/* mul */
/* inv */
/* dvd */
/* */
/* Arithmetic functions for multiple precision numbers. */
/* Common types and definition */
/************************************************************************/
typedef struct {/* This structure holds the details of a multi-precision */
int e; /* floating point number, x: d[0] holds its sign (-1,0 or 1) */
double d[40]; /* e holds its exponent (...,-2,-1,0,1,2,...) and */
} mp_no; /* d[1]...d[p] hold its mantissa digits. The value of x is, */
/* x = d[1]*r**(e-1) + d[2]*r**(e-2) + ... + d[p]*r**(e-p). */
/* Here r = 2**24, 0 <= d[i] < r and 1 <= p <= 32. */
/* p is a global variable. A multi-precision number is */
/* always normalized. Namely, d[1] > 0. An exception is */
/* a zero which is characterized by d[0] = 0. The terms */
/* d[p+1], d[p+2], ... of a none zero number have no */
/* significance and so are the terms e, d[1],d[2],... */
/* of a zero. */
typedef union { int i[2]; double d; } number;
#define X x->d
#define Y y->d
#define Z z->d
#define EX x->e
#define EY y->e
#define EZ z->e
#define MAX(x,y) ((x) < (y) ? (y) : (x))
#define MIN(x,y) ((x) < (y) ? (x) : (y))
#define ABS(x) ((x) < 0 ? -(x) : (x))
int __acr(const mp_no *, const mp_no *, int);
int __cr(const mp_no *, const mp_no *, int);
void __cpy(const mp_no *, mp_no *, int);
void __cpymn(const mp_no *, int, mp_no *, int);
void __mp_dbl(const mp_no *, double *, int);
void __dbl_mp(double, mp_no *, int);
void __add(const mp_no *, const mp_no *, mp_no *, int);
void __sub(const mp_no *, const mp_no *, mp_no *, int);
void __mul(const mp_no *, const mp_no *, mp_no *, int);
void __inv(const mp_no *, mp_no *, int);
void __dvd(const mp_no *, const mp_no *, mp_no *, int);
extern void __mpatan (mp_no *, mp_no *, int);
extern void __mpatan2 (mp_no *, mp_no *, mp_no *, int);
extern void __mpsqrt (mp_no *, mp_no *, int);
extern void __mpexp (mp_no *, mp_no *__y, int);
extern void __c32 (mp_no *, mp_no *, mp_no *, int);
extern int __mpranred (double, mp_no *, int);