/*  const15.h    CCMATH mathematics library source code.
 *
 *  Copyright (C)  2000   Daniel A. Atkinson    All rights reserved.
 *  This code may be redistributed under the terms of the GNU library
 *  public license (LGPL). ( See the lgpl.license file for details.)
 * ------------------------------------------------------------------------
 */
/* Constants file for XDIM=15
*/
unsigned short m_sgn=0x8000,m_exp=0x7fff;
short bias=16383;
int itt_div=3,k_tanh=6;
int ms_exp=39,ms_hyp=45,ms_trg=55;
short max_p=16*XDIM,k_lin= -8*XDIM;
short d_bias=15360,d_max=2047,d_lex=12;
struct xpr zero={0x0,0x0};
struct xpr one={0x3fff,0x8000};
struct xpr two={0x4000,0x8000};
struct xpr ten={0x4002,0xa000};
struct xpr x_huge={0x7fff,0x0};
struct xpr pi4={0x3ffe,0xc90f,0xdaa2,0x2168,0xc234,0xc4c6,0x628b,
  0x80dc,0x1cd1,0x2902,0x4e08,0x8a67,0xcc74,0x020b,0xbea6,0x3b17};
struct xpr pi2={0x3fff,0xc90f,0xdaa2,0x2168,0xc234,0xc4c6,0x628b,
  0x80dc,0x1cd1,0x2902,0x4e08,0x8a67,0xcc74,0x020b,0xbea6,0x3b17};
struct xpr pi={0x4000,0xc90f,0xdaa2,0x2168,0xc234,0xc4c6,0x628b,
  0x80dc,0x1cd1,0x2902,0x4e08,0x8a67,0xcc74,0x020b,0xbea6,0x3b17};
struct xpr ee={0x4000,0xadf8,0x5458,0xa2bb,0x4a9a,0xafdc,0x5620,
  0x273d,0x3cf1,0xd8b9,0xc583,0xce2d,0x3695,0xa9e1,0x3641,0x1449};
struct xpr ln2={0x3ffe,0xb172,0x17f7,0xd1cf,0x79ab,0xc9e3,0xb398,
  0x03f2,0xf6af,0x40f3,0x4326,0x7298,0xb62d,0x8a0d,0x175b,0x8b83};
struct xpr srt2={0x3fff,0xb504,0xf333,0xf9de,0x6484,0x597d,0x89b3,
  0x754a,0xbe9f,0x1d6f,0x60ba,0x893b,0xa84c,0xed17,0xac85,0x8338};