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_EMU64LSB
868b2b66 (kx 2024-12-20 16:11:07 +0300 3) #define __REAL_INTERNAL_DEC_EXP_EMU64LSB
868b2b66 (kx 2024-12-20 16:11:07 +0300 4)
868b2b66 (kx 2024-12-20 16:11:07 +0300 5) #if BITS_PER_EMUSHORT == 64
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) 0x0000000000000026,
868b2b66 (kx 2024-12-20 16:11:07 +0300 16) 0x0000000000000000
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) 0x0000000000000134,
868b2b66 (kx 2024-12-20 16:11:07 +0300 22) 0x0000000000000000
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) 0x0000000013441350,
868b2b66 (kx 2024-12-20 16:11:07 +0300 28) 0x0000000000000000
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) 0x0000000013441350,
868b2b66 (kx 2024-12-20 16:11:07 +0300 34) 0x0000000000000000
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) 0x134413509f79fef3,
868b2b66 (kx 2024-12-20 16:11:07 +0300 41) 0x0000000000000000
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) 0x134413509f79fef3,
868b2b66 (kx 2024-12-20 16:11:07 +0300 47) 0x0000000000000000
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) 0x11f12b35816f922f, 0x134413509f79fef3,
868b2b66 (kx 2024-12-20 16:11:07 +0300 54) 0x0000000000000000
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) 0x11f12b35816f922f, 0x134413509f79fef3,
868b2b66 (kx 2024-12-20 16:11:07 +0300 60) 0x0000000000000000
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) 0x314bcde4d6f98c79, 0x04d5a618a87a3e69,
868b2b66 (kx 2024-12-20 16:11:07 +0300 68) 0x11f12b35816f922f, 0x134413509f79fef3,
868b2b66 (kx 2024-12-20 16:11:07 +0300 69) 0x0000000000000000
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) 0x314bcde4d6f98c79, 0x04d5a618a87a3e69,
868b2b66 (kx 2024-12-20 16:11:07 +0300 76) 0x11f12b35816f922f, 0x134413509f79fef3,
868b2b66 (kx 2024-12-20 16:11:07 +0300 77) 0x0000000000000000
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) 0xcb16a4fea4aa5a59, 0x5228e692b6317243,
868b2b66 (kx 2024-12-20 16:11:07 +0300 87) 0x13cb978e668e37a2, 0x650d45b03233f57a,
868b2b66 (kx 2024-12-20 16:11:07 +0300 88) 0x314bcde4d6f98c79, 0x04d5a618a87a3e69,
868b2b66 (kx 2024-12-20 16:11:07 +0300 89) 0x11f12b35816f922f, 0x134413509f79fef3,
868b2b66 (kx 2024-12-20 16:11:07 +0300 90) 0x0000000000000000
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) 0xcb16a4fea4aa5a59, 0x5228e692b6317243,
868b2b66 (kx 2024-12-20 16:11:07 +0300 99) 0x13cb978e668e37a2, 0x650d45b03233f57a,
868b2b66 (kx 2024-12-20 16:11:07 +0300 100) 0x314bcde4d6f98c79, 0x04d5a618a87a3e69,
868b2b66 (kx 2024-12-20 16:11:07 +0300 101) 0x11f12b35816f922f, 0x134413509f79fef3,
868b2b66 (kx 2024-12-20 16:11:07 +0300 102) 0x0000000000000000
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) 0x7bdd462ef91f1195, 0x2d46cf70279e991f,
868b2b66 (kx 2024-12-20 16:11:07 +0300 116) 0x01610678b2835704, 0x8091afd4b3d62a7b,
868b2b66 (kx 2024-12-20 16:11:07 +0300 117) 0x9d72225362b25b3b, 0xba4d84e5fbce205e,
868b2b66 (kx 2024-12-20 16:11:07 +0300 118) 0x939e3a321880c05c, 0x8bf06fbdc04aab97,
868b2b66 (kx 2024-12-20 16:11:07 +0300 119) 0xcb16a4fea4aa5a59, 0x5228e692b6317243,
868b2b66 (kx 2024-12-20 16:11:07 +0300 120) 0x13cb978e668e37a2, 0x650d45b03233f57a,
868b2b66 (kx 2024-12-20 16:11:07 +0300 121) 0x314bcde4d6f98c79, 0x04d5a618a87a3e69,
868b2b66 (kx 2024-12-20 16:11:07 +0300 122) 0x11f12b35816f922f, 0x134413509f79fef3,
868b2b66 (kx 2024-12-20 16:11:07 +0300 123) 0x0000000000000000
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) 0xffffffffffffffdb, /* -38 = 0xffda; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 136) 0xffffffffffffffff
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) 0xfffffffffffffecd, /* -308 = 0xfecc; */
868b2b66 (kx 2024-12-20 16:11:07 +0300 142) 0xffffffffffffffff
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) 0xffffffffecbbec94,
868b2b66 (kx 2024-12-20 16:11:07 +0300 148) 0xffffffffffffffff
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) 0xffffffffecbbec6d,
868b2b66 (kx 2024-12-20 16:11:07 +0300 154) 0xffffffffffffffff
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) 0xecbbecaf60860087,
868b2b66 (kx 2024-12-20 16:11:07 +0300 161) 0xffffffffffffffff
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) 0xecbbecaf6085ffed,
868b2b66 (kx 2024-12-20 16:11:07 +0300 167) 0xffffffffffffffff
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) 0xee0ed4ca7e906b90, 0xecbbecaf6086010c,
868b2b66 (kx 2024-12-20 16:11:07 +0300 174) 0xffffffffffffffff
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) 0xee0ed4ca7e906928, 0xecbbecaf6086010c,
868b2b66 (kx 2024-12-20 16:11:07 +0300 180) 0xffffffffffffffff
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) 0xceb4321b29066a33, 0xfb2a59e75785c196,
868b2b66 (kx 2024-12-20 16:11:07 +0300 188) 0xee0ed4ca7e906dd0, 0xecbbecaf6086010c,
868b2b66 (kx 2024-12-20 16:11:07 +0300 189) 0xffffffffffffffff
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) 0xceb4321b29066091, 0xfb2a59e75785c196,
868b2b66 (kx 2024-12-20 16:11:07 +0300 196) 0xee0ed4ca7e906dd0, 0xecbbecaf6086010c,
868b2b66 (kx 2024-12-20 16:11:07 +0300 197) 0xffffffffffffffff
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) 0x34e95b015b557fba, 0xadd7196d49ce8dbc,
868b2b66 (kx 2024-12-20 16:11:07 +0300 207) 0xec3468719971c85d, 0x9af2ba4fcdcc0a85,
868b2b66 (kx 2024-12-20 16:11:07 +0300 208) 0xceb4321b29067386, 0xfb2a59e75785c196,
868b2b66 (kx 2024-12-20 16:11:07 +0300 209) 0xee0ed4ca7e906dd0, 0xecbbecaf6086010c,
868b2b66 (kx 2024-12-20 16:11:07 +0300 210) 0xffffffffffffffff
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) 0x34e95b015b555931, 0xadd7196d49ce8dbc,
868b2b66 (kx 2024-12-20 16:11:07 +0300 219) 0xec3468719971c85d, 0x9af2ba4fcdcc0a85,
868b2b66 (kx 2024-12-20 16:11:07 +0300 220) 0xceb4321b29067386, 0xfb2a59e75785c196,
868b2b66 (kx 2024-12-20 16:11:07 +0300 221) 0xee0ed4ca7e906dd0, 0xecbbecaf6086010c,
868b2b66 (kx 2024-12-20 16:11:07 +0300 222) 0xffffffffffffffff
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) 0x8422b9d106e0557f, 0xd2b9308fd86166e0,
868b2b66 (kx 2024-12-20 16:11:07 +0300 236) 0xfe9ef9874d7ca8fb, 0x7f6e502b4c29d584,
868b2b66 (kx 2024-12-20 16:11:07 +0300 237) 0x628dddac9d4da4c4, 0x45b27b1a0431dfa1,
868b2b66 (kx 2024-12-20 16:11:07 +0300 238) 0x6c61c5cde77f3fa3, 0x740f90423fb55468,
868b2b66 (kx 2024-12-20 16:11:07 +0300 239) 0x34e95b015b55a5a6, 0xadd7196d49ce8dbc,
868b2b66 (kx 2024-12-20 16:11:07 +0300 240) 0xec3468719971c85d, 0x9af2ba4fcdcc0a85,
868b2b66 (kx 2024-12-20 16:11:07 +0300 241) 0xceb4321b29067386, 0xfb2a59e75785c196,
868b2b66 (kx 2024-12-20 16:11:07 +0300 242) 0xee0ed4ca7e906dd0, 0xecbbecaf6086010c,
868b2b66 (kx 2024-12-20 16:11:07 +0300 243) 0xffffffffffffffff
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 != 64 */
868b2b66 (kx 2024-12-20 16:11:07 +0300 247) #error ldec_exp_emu64lsb.dfn: ERROR: Failed size of EMUSHORT data type.
868b2b66 (kx 2024-12-20 16:11:07 +0300 248) #endif /* BITS_PER_EMUSHORT == 64 */
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_EMU64LSB */
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