/*  const31.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=31
*/
unsigned short m_sgn=0x8000,m_exp=0x7fff;
short bias=16383;
int itt_div=4,k_tanh=7;
int ms_exp=73,ms_hyp=83,ms_trg=95;
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,0x3b13,0x9b22,0x514a,
  0x0879,0x8e34,0x04dd,0xef95,0x19b3,0xcd3a,0x431b,0x302b,0x0a6d,0xf25f,
  0x1437,0x4fe1,0x356d,0x6d57};
struct xpr pi2={0x3fff,0xc90f,0xdaa2,0x2168,0xc234,0xc4c6,0x628b,0x80dc,
  0x1cd1,0x2902,0x4e08,0x8a67,0xcc74,0x020b,0xbea6,0x3b13,0x9b22,0x514a,
  0x0879,0x8e34,0x04dd,0xef95,0x19b3,0xcd3a,0x431b,0x302b,0x0a6d,0xf25f,
  0x1437,0x4fe1,0x356d,0x6d57};
struct xpr pi={0x4000,0xc90f,0xdaa2,0x2168,0xc234,0xc4c6,0x628b,0x80dc,
  0x1cd1,0x2902,0x4e08,0x8a67,0xcc74,0x020b,0xbea6,0x3b13,0x9b22,0x514a,
  0x0879,0x8e34,0x04dd,0xef95,0x19b3,0xcd3a,0x431b,0x302b,0x0a6d,0xf25f,
  0x1437,0x4fe1,0x356d,0x6d57};
struct xpr ee={0x4000,0xadf8,0x5458,0xa2bb,0x4a9a,0xafdc,0x5620,0x273d,
  0x3cf1,0xd8b9,0xc583,0xce2d,0x3695,0xa9e1,0x3641,0x1464,0x33fb,0xcc93,
  0x9dce,0x249b,0x3ef9,0x7d2f,0xe363,0x630c,0x75d8,0xf681,0xb202,0xaec4,
  0x617a,0xd3df,0x1ed5,0xd5fd};
struct xpr ln2={0x3ffe,0xb172,0x17f7,0xd1cf,0x79ab,0xc9e3,0xb398,0x03f2,
  0xf6af,0x40f3,0x4326,0x7298,0xb62d,0x8a0d,0x175b,0x8baa,0xfa2b,0xe7b8,
  0x7620,0x6deb,0xac98,0x5595,0x52fb,0x4afa,0x1b10,0xed2e,0xae35,0xc138,
  0x2144,0x2757,0x3b29,0x1170};
struct xpr srt2={0x3fff,0xb504,0xf333,0xf9de,0x6484,0x597d,0x89b3,0x754a,
  0xbe9f,0x1d6f,0x60ba,0x893b,0xa84c,0xed17,0xac85,0x8333,0x9915,0x4afc,
  0x8304,0x3ab8,0xa2c3,0xa8b1,0xfe6f,0xdc83,0xdb39,0x0f74,0xa85e,0x439c,
  0x7b4a,0x7804,0x8736,0x3dfa};