868b2b66 (kx 2024-12-20 16:11:07 +0300 1)
868b2b66 (kx 2024-12-20 16:11:07 +0300 2) #ifndef __REAL_INTERNAL_DEC_EXP_EMU32MSB
868b2b66 (kx 2024-12-20 16:11:07 +0300 3) #define __REAL_INTERNAL_DEC_EXP_EMU32MSB
868b2b66 (kx 2024-12-20 16:11:07 +0300 4)
868b2b66 (kx 2024-12-20 16:11:07 +0300 5) #if BITS_PER_EMUSHORT == 32
868b2b66 (kx 2024-12-20 16:11:07 +0300 6)
868b2b66 (kx 2024-12-20 16:11:07 +0300 7) /***************************************************************
868b2b66 (kx 2024-12-20 16:11:07 +0300 8) Определения для Максимальной десятичной Экспоненты чисел
868b2b66 (kx 2024-12-20 16:11:07 +0300 9) типа real.
868b2b66 (kx 2024-12-20 16:11:07 +0300 10) ***************************************************************/
868b2b66 (kx 2024-12-20 16:11:07 +0300 11)
868b2b66 (kx 2024-12-20 16:11:07 +0300 12) /* REAL_32_MAX_DEC_EXP = 38; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 13) static EMUSHORT _max_dec_exp_32_[NPIE_32+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 14) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 15) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 16) 0x00000026
868b2b66 (kx 2024-12-20 16:11:07 +0300 17) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 18) /* REAL_64_MAX_DEC_EXP = 308; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 19) static EMUSHORT _max_dec_exp_64_[NPIE_64+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 20) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 21) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 22) 0x00000134
868b2b66 (kx 2024-12-20 16:11:07 +0300 23) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 24) /* REAL_128_MAX_DEC_EXP = 323228496; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 25) static EMUSHORT _max_dec_exp_128_[NPIE_128+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 26) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 27) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 28) 0x13441350
868b2b66 (kx 2024-12-20 16:11:07 +0300 29) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 30) /* REAL_256_MAX_DEC_EXP = 323228496; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 31) static EMUSHORT _max_dec_exp_256_[NPIE_256+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 32) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 33) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 34) 0x13441350
868b2b66 (kx 2024-12-20 16:11:07 +0300 35) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 36)
868b2b66 (kx 2024-12-20 16:11:07 +0300 37) /* REAL_512_MAX_DEC_EXP = 1388255822130839283; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 38) static EMUSHORT _max_dec_exp_512_[NPIE_512+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 39) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 40) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 41) 0x13441350, 0x9f79fef3
868b2b66 (kx 2024-12-20 16:11:07 +0300 42) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 43) /* REAL_1024_MAX_DEC_EXP = 1388255822130839283; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 44) static EMUSHORT _max_dec_exp_1024_[NPIE_1024+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 45) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 46) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 47) 0x13441350, 0x9f79fef3
868b2b66 (kx 2024-12-20 16:11:07 +0300 48) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 49)
868b2b66 (kx 2024-12-20 16:11:07 +0300 50) /* REAL_2048_MAX_DEC_EXP = 25608799859684840937503027312525808175; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 51) static EMUSHORT _max_dec_exp_2048_[NPIE_2048+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 52) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 53) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 54) 0x13441350, 0x9f79fef3, 0x11f12b35, 0x816f922f
868b2b66 (kx 2024-12-20 16:11:07 +0300 55) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 56) /* REAL_4096_MAX_DEC_EXP = 25608799859684840937503027312525808175; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 57) static EMUSHORT _max_dec_exp_4096_[NPIE_4096+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 58) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 59) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 60) 0x13441350, 0x9f79fef3, 0x11f12b35, 0x816f922f
868b2b66 (kx 2024-12-20 16:11:07 +0300 61) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 62)
868b2b66 (kx 2024-12-20 16:11:07 +0300 63) /* REAL_8192_MAX_DEC_EXP = 87142230302581544824664289252326044991\
868b2b66 (kx 2024-12-20 16:11:07 +0300 64) 25871092238398896386086649085145222265; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 65) static EMUSHORT _max_dec_exp_8192_[NPIE_8192+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 66) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 67) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 68) 0x13441350, 0x9f79fef3, 0x11f12b35, 0x816f922f,
868b2b66 (kx 2024-12-20 16:11:07 +0300 69) 0x04d5a618, 0xa87a3e69, 0x314bcde4, 0xd6f98c79
868b2b66 (kx 2024-12-20 16:11:07 +0300 70) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 71) /* REAL_16384_MAX_DEC_EXP = 87142230302581544824664289252326044991\
868b2b66 (kx 2024-12-20 16:11:07 +0300 72) 25871092238398896386086649085145222265; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 73) static EMUSHORT _max_dec_exp_16384_[NPIE_16384+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 74) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 75) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 76) 0x13441350, 0x9f79fef3, 0x11f12b35, 0x816f922f,
868b2b66 (kx 2024-12-20 16:11:07 +0300 77) 0x04d5a618, 0xa87a3e69, 0x314bcde4, 0xd6f98c79
868b2b66 (kx 2024-12-20 16:11:07 +0300 78) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 79)
868b2b66 (kx 2024-12-20 16:11:07 +0300 80) /* REAL_32768_MAX_DEC_EXP = 100903809075352817242282879963567487875\
868b2b66 (kx 2024-12-20 16:11:07 +0300 81) 892099021734287898338535355230181019603\
868b2b66 (kx 2024-12-20 16:11:07 +0300 82) 864364986397683765368543149769469684639\
868b2b66 (kx 2024-12-20 16:11:07 +0300 83) 4562057154816912385935155623782668889; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 84) static EMUSHORT _max_dec_exp_32768_[NPIE_32768+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 85) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 86) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 87) 0x13441350, 0x9f79fef3, 0x11f12b35, 0x816f922f,
868b2b66 (kx 2024-12-20 16:11:07 +0300 88) 0x04d5a618, 0xa87a3e69, 0x314bcde4, 0xd6f98c79,
868b2b66 (kx 2024-12-20 16:11:07 +0300 89) 0x650d45b0, 0x3233f57a, 0x13cb978e, 0x668e37a2,
868b2b66 (kx 2024-12-20 16:11:07 +0300 90) 0x5228e692, 0xb6317243, 0xcb16a4fe, 0xa4aa5a59
868b2b66 (kx 2024-12-20 16:11:07 +0300 91) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 92) /* REAL_65536_MAX_DEC_EXP = 100903809075352817242282879963567487875\
868b2b66 (kx 2024-12-20 16:11:07 +0300 93) 892099021734287898338535355230181019603\
868b2b66 (kx 2024-12-20 16:11:07 +0300 94) 864364986397683765368543149769469684639\
868b2b66 (kx 2024-12-20 16:11:07 +0300 95) 4562057154816912385935155623782668889; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 96) static EMUSHORT _max_dec_exp_65536_[NPIE_65536+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 97) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 98) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 99) 0x13441350, 0x9f79fef3, 0x11f12b35, 0x816f922f,
868b2b66 (kx 2024-12-20 16:11:07 +0300 100) 0x04d5a618, 0xa87a3e69, 0x314bcde4, 0xd6f98c79,
868b2b66 (kx 2024-12-20 16:11:07 +0300 101) 0x650d45b0, 0x3233f57a, 0x13cb978e, 0x668e37a2,
868b2b66 (kx 2024-12-20 16:11:07 +0300 102) 0x5228e692, 0xb6317243, 0xcb16a4fe, 0xa4aa5a59
868b2b66 (kx 2024-12-20 16:11:07 +0300 103) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 104)
868b2b66 (kx 2024-12-20 16:11:07 +0300 105) /* REAL_131072_MAX_DEC_EXP = 135289889148192929926396705879397085897\
868b2b66 (kx 2024-12-20 16:11:07 +0300 106) 289585448728420527912857292534983632920\
868b2b66 (kx 2024-12-20 16:11:07 +0300 107) 892390565864459960588805664323238032415\
868b2b66 (kx 2024-12-20 16:11:07 +0300 108) 039482253220245990514340092162621997241\
868b2b66 (kx 2024-12-20 16:11:07 +0300 109) 131037226858003884184847076362850336738\
868b2b66 (kx 2024-12-20 16:11:07 +0300 110) 763387861134927266253983334997968052515\
868b2b66 (kx 2024-12-20 16:11:07 +0300 111) 115732240463573024754589210939947951624\
868b2b66 (kx 2024-12-20 16:11:07 +0300 112) 90520947274478376589561024881824149; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 113) static EMUSHORT _max_dec_exp_131072_[NPIE_131072+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 114) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 115) 0x00000000,
868b2b66 (kx 2024-12-20 16:11:07 +0300 116) 0x13441350, 0x9f79fef3, 0x11f12b35, 0x816f922f,
868b2b66 (kx 2024-12-20 16:11:07 +0300 117) 0x04d5a618, 0xa87a3e69, 0x314bcde4, 0xd6f98c79,
868b2b66 (kx 2024-12-20 16:11:07 +0300 118) 0x650d45b0, 0x3233f57a, 0x13cb978e, 0x668e37a2,
868b2b66 (kx 2024-12-20 16:11:07 +0300 119) 0x5228e692, 0xb6317243, 0xcb16a4fe, 0xa4aa5a59,
868b2b66 (kx 2024-12-20 16:11:07 +0300 120) 0x8bf06fbd, 0xc04aab97, 0x939e3a32, 0x1880c05c,
868b2b66 (kx 2024-12-20 16:11:07 +0300 121) 0xba4d84e5, 0xfbce205e, 0x9d722253, 0x62b25b3b,
868b2b66 (kx 2024-12-20 16:11:07 +0300 122) 0x8091afd4, 0xb3d62a7b, 0x01610678, 0xb2835704,
868b2b66 (kx 2024-12-20 16:11:07 +0300 123) 0x2d46cf70, 0x279e991f, 0x7bdd462e, 0xf91f1195
868b2b66 (kx 2024-12-20 16:11:07 +0300 124) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 125)
868b2b66 (kx 2024-12-20 16:11:07 +0300 126)
868b2b66 (kx 2024-12-20 16:11:07 +0300 127) /***************************************************************
868b2b66 (kx 2024-12-20 16:11:07 +0300 128) Определения для Минимальной десятичной Экспоненты чисел
868b2b66 (kx 2024-12-20 16:11:07 +0300 129) типа real.
868b2b66 (kx 2024-12-20 16:11:07 +0300 130) ***************************************************************/
868b2b66 (kx 2024-12-20 16:11:07 +0300 131)
868b2b66 (kx 2024-12-20 16:11:07 +0300 132) /* REAL_32_MIN_DEC_EXP = -37; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 133) static EMUSHORT _min_dec_exp_32_[NPIE_32+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 134) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 135) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 136) 0xffffffdb /* -38 = 0xffda; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 137) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 138) /* REAL_64_MIN_DEC_EXP = -307; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 139) static EMUSHORT _min_dec_exp_64_[NPIE_64+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 140) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 141) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 142) 0xfffffecd /* -308 = 0xfecc; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 143) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 144) /* REAL_128_MIN_DEC_EXP = -323228524; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 145) static EMUSHORT _min_dec_exp_128_[NPIE_128+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 146) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 147) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 148) 0xecbbec94
868b2b66 (kx 2024-12-20 16:11:07 +0300 149) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 150) /* REAL_256_MIN_DEC_EXP = -323228563; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 151) static EMUSHORT _min_dec_exp_256_[NPIE_256+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 152) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 153) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 154) 0xecbbec6d
868b2b66 (kx 2024-12-20 16:11:07 +0300 155) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 156)
868b2b66 (kx 2024-12-20 16:11:07 +0300 157) /* REAL_512_MIN_DEC_EXP = -1388255822130839417; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 158) static EMUSHORT _min_dec_exp_512_[NPIE_512+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 159) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 160) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 161) 0xecbbecaf, 0x60860087
868b2b66 (kx 2024-12-20 16:11:07 +0300 162) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 163) /* REAL_1024_MIN_DEC_EXP = -1388255822130839571; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 164) static EMUSHORT _min_dec_exp_1024_[NPIE_1024+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 165) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 166) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 167) 0xecbbecaf, 0x6085ffed
868b2b66 (kx 2024-12-20 16:11:07 +0300 168) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 169)
868b2b66 (kx 2024-12-20 16:11:07 +0300 170) /* REAL_2048_MIN_DEC_EXP = -25608799859684840937503027312525808752; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 171) static EMUSHORT _min_dec_exp_2048_[NPIE_2048+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 172) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 173) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 174) 0xecbbecaf, 0x6086010c, 0xee0ed4ca, 0x7e906b90
868b2b66 (kx 2024-12-20 16:11:07 +0300 175) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 176) /* REAL_4096_MIN_DEC_EXP = -25608799859684840937503027312525809368; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 177) static EMUSHORT _min_dec_exp_4096_[NPIE_4096+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 178) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 179) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 180) 0xecbbecaf, 0x6086010c, 0xee0ed4ca, 0x7e906928
868b2b66 (kx 2024-12-20 16:11:07 +0300 181) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 182)
868b2b66 (kx 2024-12-20 16:11:07 +0300 183) /* REAL_8192_MIN_DEC_EXP = -87142230302581544824664289252326044991\
868b2b66 (kx 2024-12-20 16:11:07 +0300 184) 25871092238398896386086649085145224653; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 185) static EMUSHORT _min_dec_exp_8192_[NPIE_8192+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 186) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 187) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 188) 0xecbbecaf, 0x6086010c, 0xee0ed4ca, 0x7e906dd0,
868b2b66 (kx 2024-12-20 16:11:07 +0300 189) 0xfb2a59e7, 0x5785c196, 0xceb4321b, 0x29066a33
868b2b66 (kx 2024-12-20 16:11:07 +0300 190) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 191) /* REAL_16384_MIN_DEC_EXP = -87142230302581544824664289252326044991\
868b2b66 (kx 2024-12-20 16:11:07 +0300 192) 25871092238398896386086649085145227119; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 193) static EMUSHORT _min_dec_exp_16384_[NPIE_16384+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 194) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 195) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 196) 0xecbbecaf, 0x6086010c, 0xee0ed4ca, 0x7e906dd0,
868b2b66 (kx 2024-12-20 16:11:07 +0300 197) 0xfb2a59e7, 0x5785c196, 0xceb4321b, 0x29066091
868b2b66 (kx 2024-12-20 16:11:07 +0300 198) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 199)
868b2b66 (kx 2024-12-20 16:11:07 +0300 200) /* REAL_32768_MIN_DEC_EXP = -100903809075352817242282879963567487875\
868b2b66 (kx 2024-12-20 16:11:07 +0300 201) 892099021734287898338535355230181019603\
868b2b66 (kx 2024-12-20 16:11:07 +0300 202) 864364986397683765368543149769469684639\
868b2b66 (kx 2024-12-20 16:11:07 +0300 203) 4562057154816912385935155623782678598; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 204) static EMUSHORT _min_dec_exp_32768_[NPIE_32768+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 205) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 206) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 207) 0xecbbecaf, 0x6086010c, 0xee0ed4ca, 0x7e906dd0,
868b2b66 (kx 2024-12-20 16:11:07 +0300 208) 0xfb2a59e7, 0x5785c196, 0xceb4321b, 0x29067386,
868b2b66 (kx 2024-12-20 16:11:07 +0300 209) 0x9af2ba4f, 0xcdcc0a85, 0xec346871, 0x9971c85d,
868b2b66 (kx 2024-12-20 16:11:07 +0300 210) 0xadd7196d, 0x49ce8dbc, 0x34e95b01, 0x5b557fba
868b2b66 (kx 2024-12-20 16:11:07 +0300 211) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 212) /* REAL_65536_MIN_DEC_EXP = -100903809075352817242282879963567487875\
868b2b66 (kx 2024-12-20 16:11:07 +0300 213) 892099021734287898338535355230181019603\
868b2b66 (kx 2024-12-20 16:11:07 +0300 214) 864364986397683765368543149769469684639\
868b2b66 (kx 2024-12-20 16:11:07 +0300 215) 4562057154816912385935155623782688463; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 216) static EMUSHORT _min_dec_exp_65536_[NPIE_65536+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 217) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 218) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 219) 0xecbbecaf, 0x6086010c, 0xee0ed4ca, 0x7e906dd0,
868b2b66 (kx 2024-12-20 16:11:07 +0300 220) 0xfb2a59e7, 0x5785c196, 0xceb4321b, 0x29067386,
868b2b66 (kx 2024-12-20 16:11:07 +0300 221) 0x9af2ba4f, 0xcdcc0a85, 0xec346871, 0x9971c85d,
868b2b66 (kx 2024-12-20 16:11:07 +0300 222) 0xadd7196d, 0x49ce8dbc, 0x34e95b01, 0x5b555931
868b2b66 (kx 2024-12-20 16:11:07 +0300 223) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 224)
868b2b66 (kx 2024-12-20 16:11:07 +0300 225) /* REAL_131072_MIN_DEC_EXP = -135289889148192929926396705879397085897\
868b2b66 (kx 2024-12-20 16:11:07 +0300 226) 289585448728420527912857292534983632920\
868b2b66 (kx 2024-12-20 16:11:07 +0300 227) 892390565864459960588805664323238032415\
868b2b66 (kx 2024-12-20 16:11:07 +0300 228) 039482253220245990514340092162621997241\
868b2b66 (kx 2024-12-20 16:11:07 +0300 229) 131037226858003884184847076362850336738\
868b2b66 (kx 2024-12-20 16:11:07 +0300 230) 763387861134927266253983334997968052515\
868b2b66 (kx 2024-12-20 16:11:07 +0300 231) 115732240463573024754589210939947951624\
868b2b66 (kx 2024-12-20 16:11:07 +0300 232) 90520947274478376589561024881863297; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 233) static EMUSHORT _min_dec_exp_131072_[NPIE_131072+1] =
868b2b66 (kx 2024-12-20 16:11:07 +0300 234) {
868b2b66 (kx 2024-12-20 16:11:07 +0300 235) 0xffffffff,
868b2b66 (kx 2024-12-20 16:11:07 +0300 236) 0xecbbecaf, 0x6086010c, 0xee0ed4ca, 0x7e906dd0,
868b2b66 (kx 2024-12-20 16:11:07 +0300 237) 0xfb2a59e7, 0x5785c196, 0xceb4321b, 0x29067386,
868b2b66 (kx 2024-12-20 16:11:07 +0300 238) 0x9af2ba4f, 0xcdcc0a85, 0xec346871, 0x9971c85d,
868b2b66 (kx 2024-12-20 16:11:07 +0300 239) 0xadd7196d, 0x49ce8dbc, 0x34e95b01, 0x5b55a5a6,
868b2b66 (kx 2024-12-20 16:11:07 +0300 240) 0x740f9042, 0x3fb55468, 0x6c61c5cd, 0xe77f3fa3,
868b2b66 (kx 2024-12-20 16:11:07 +0300 241) 0x45b27b1a, 0x0431dfa1, 0x628dddac, 0x9d4da4c4,
868b2b66 (kx 2024-12-20 16:11:07 +0300 242) 0x7f6e502b, 0x4c29d584, 0xfe9ef987, 0x4d7ca8fb,
868b2b66 (kx 2024-12-20 16:11:07 +0300 243) 0xd2b9308f, 0xd86166e0, 0x8422b9d1, 0x06e0557f
868b2b66 (kx 2024-12-20 16:11:07 +0300 244) };
868b2b66 (kx 2024-12-20 16:11:07 +0300 245)
868b2b66 (kx 2024-12-20 16:11:07 +0300 246) #else /* BITS_PER_EMUSHORT != 32 */
868b2b66 (kx 2024-12-20 16:11:07 +0300 247) #error ldec_exp_emu32msb.dfn: ERROR: Failed size of EMUSHORT data type.
868b2b66 (kx 2024-12-20 16:11:07 +0300 248) #endif /* BITS_PER_EMUSHORT == 32 */
868b2b66 (kx 2024-12-20 16:11:07 +0300 249)
868b2b66 (kx 2024-12-20 16:11:07 +0300 250) #endif /* __REAL_INTERNAL_DEC_EXP_EMU32MSB */
Math Processor Unit Library
libmpu – library of arithmetic functions for integer, real, and complex numbers of increased digit capacity
16 Commits
0 Branches
2 Tags