XPD
short MAXNUML[] = {0xffff,0xffff,0xffff,0xffff,0x7ffe, XPD};
short MAXLOGL[] = {0x79ab,0xd1cf,0x17f7,0xb172,0x400c, XPD};
short INFINITYL[] = {0,0,0,0x8000,0x7fff, XPD};
short NANL[] = {0,0,0,0xc000,0x7fff, XPD};
short INFINITYL[] = {0xffff,0xffff,0xffff,0xffff,0x7ffe, XPD};
short MINLOGL[] = {0xbaaa,0x09e2,0xfe7f,0xb21d,0xc00c, XPD};
short MINLOGL[] = {0xeb2f,0x1210,0x8c67,0xb16c,0xc00c, XPD};
short MACHEPL[] = {0x0000,0x0000,0x0000,0x8000,0x3fbf, XPD};
short LOGE2L[] = {0x79ac,0xd1cf,0x17f7,0xb172,0x3ffe, XPD};
short LOG2EL[] = {0xf0bc,0x5c17,0x3b29,0xb8aa,0x3fff, XPD};
short PIL[] = {0xc235,0x2168,0xdaa2,0xc90f,0x4000, XPD};
short PIO2L[] = {0xc235,0x2168,0xdaa2,0xc90f,0x3fff, XPD};
short PIO4L[] = {0xc235,0x2168,0xdaa2,0xc90f,0x3ffe, XPD};