1*379f1467SIngo Weinhold /* 2*379f1467SIngo Weinhold * IBM Accurate Mathematical Library 3*379f1467SIngo Weinhold * Written by International Business Machines Corp. 4*379f1467SIngo Weinhold * Copyright (C) 2001 Free Software Foundation, Inc. 5*379f1467SIngo Weinhold * 6*379f1467SIngo Weinhold * This program is free software; you can redistribute it and/or modify 7*379f1467SIngo Weinhold * it under the terms of the GNU Lesser General Public License as published by 8*379f1467SIngo Weinhold * the Free Software Foundation; either version 2.1 of the License, or 9*379f1467SIngo Weinhold * (at your option) any later version. 10*379f1467SIngo Weinhold * 11*379f1467SIngo Weinhold * This program is distributed in the hope that it will be useful, 12*379f1467SIngo Weinhold * but WITHOUT ANY WARRANTY; without even the implied warranty of 13*379f1467SIngo Weinhold * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14*379f1467SIngo Weinhold * GNU Lesser General Public License for more details. 15*379f1467SIngo Weinhold * 16*379f1467SIngo Weinhold * You should have received a copy of the GNU Lesser General Public License 17*379f1467SIngo Weinhold * along with this program; if not, write to the Free Software 18*379f1467SIngo Weinhold * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. 19*379f1467SIngo Weinhold */ 20*379f1467SIngo Weinhold 21*379f1467SIngo Weinhold /******************************************************************/ 22*379f1467SIngo Weinhold /* */ 23*379f1467SIngo Weinhold /* MODULE_NAME:mpatan.h */ 24*379f1467SIngo Weinhold /* */ 25*379f1467SIngo Weinhold /* common data and variables prototype and definition */ 26*379f1467SIngo Weinhold /******************************************************************/ 27*379f1467SIngo Weinhold 28*379f1467SIngo Weinhold #ifndef MPSQRT_H 29*379f1467SIngo Weinhold #define MPSQRT_H 30*379f1467SIngo Weinhold 31*379f1467SIngo Weinhold #ifdef BIG_ENDI 32*379f1467SIngo Weinhold static const number 33*379f1467SIngo Weinhold /**/ one = {{0x3ff00000, 0x00000000} }, /* 1 */ 34*379f1467SIngo Weinhold /**/ halfrad = {{0x41600000, 0x00000000} }; /* 2**23 */ 35*379f1467SIngo Weinhold 36*379f1467SIngo Weinhold #else 37*379f1467SIngo Weinhold #ifdef LITTLE_ENDI 38*379f1467SIngo Weinhold static const number 39*379f1467SIngo Weinhold /**/ one = {{0x00000000, 0x3ff00000} }, /* 1 */ 40*379f1467SIngo Weinhold /**/ halfrad = {{0x00000000, 0x41600000} }; /* 2**23 */ 41*379f1467SIngo Weinhold 42*379f1467SIngo Weinhold #endif 43*379f1467SIngo Weinhold #endif 44*379f1467SIngo Weinhold 45*379f1467SIngo Weinhold #define ONE one.d 46*379f1467SIngo Weinhold #define HALFRAD halfrad.d 47*379f1467SIngo Weinhold 48*379f1467SIngo Weinhold static const int mp[33] = {0,0,0,0,1,2,2,2,2,3,3,3,3,3,3,3,3,4,4,4,4,4,4,4, 49*379f1467SIngo Weinhold 4,4,4,4,4,4,4,4,4}; 50*379f1467SIngo Weinhold 51*379f1467SIngo Weinhold #endif 52