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
author: kx <kx@radix-linux.su> 2024-12-20 16:11:07 +0300 committer: kx <kx@radix-linux.su> 2024-12-20 16:11:07 +0300 commit: 868b2b66b564b5c00e3a74d10be45db7151627ac parent: cce2ae8d3312493b7653358bb4af201d3271377b
Commit Summary:
Version 1.0.14
Diffstat:
2 files changed, 652 insertions, 0 deletions
diff --git a/mpu/math/service/emu04096/ei_service_032_emu32lsb.dfn b/mpu/math/service/emu04096/ei_service_032_emu32lsb.dfn
new file mode 100644
index 0000000..33d4bbf
--- /dev/null
+++ b/mpu/math/service/emu04096/ei_service_032_emu32lsb.dfn
@@ -0,0 +1,346 @@
+
+#ifndef   __REAL_EINTERNAL_SERVICE_032_32LSB
+#define   __REAL_EINTERNAL_SERVICE_032_32LSB
+
+#if BITS_PER_EMUSHORT == 32
+
+/* m_ln2hi_4096 = 6.931471805599453094172321214581765680755001343602552541206800094933936219696947156058633269964186875420014810205706857336855202357581305570326707516350759619307275708283714351903070386238916734711233501153644979552391204751726815749320651555247341395258829504530070953263666426541042391578149520437404303855008019441706416715186447128399681717845469570262716310645461502572074024816377733896385506952606683411372738737229289564935470257626520988596932019650585547647033067936544325476327449512504060694381471046899465062201677204245245296126879465461931651746813926725041038025462596568691441928716082938031727143677826548775664850856740776484514644399404614226031930967354025744460703080960850474866385231381816767514353716455915549014647327219025191494910685133643405711994607190977124967637833895625383382587132905810327190358921521554706904967359184124824714639597217607617990311509865705462316411144549217360001695432531291468679627360836001212978966700534729198346851696521822739080628298317839252763043089306903951421031648769932359435936302708473079053362317697288305296644719028997071249283638891510581455345008946788105131881707227762308405146700080952307863719001651531779878344487975E-1; */
+static EMUSHORT _ei_m_ln2hi_4096_[NPIR_4096] =
+{
+/* lgw                   */
+/* S i g n i f i c a n d */
+/* hgw                   */
+/* Exponent              */
+/* Sign                  */
+   0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xa1729000, 0x731cdc8e, 0x44a02554,
+   0x30af889b, 0x96d4e6d3, 0x8f969834, 0x5570b6c6, 0x1ae273ee, 0x7598a195, 0xb365853d, 0x4d162db3,
+   0x5064c18b, 0x5f50b518, 0x1b2db31b, 0x078f735d, 0x6c606cb1, 0xae313cdb, 0xb1e17b9d, 0x955d5179,
+   0x17350d2c, 0x0c480a54, 0x5cfe7aa3, 0x074db601, 0x5e148e82, 0x6a9c7f8a, 0x3564a337, 0x25669b33,
+   0xd1d6095d, 0x4c1a1e0b, 0x9393514c, 0xcccc4e65, 0xb479cd33, 0xc943e732, 0xdb8990e5, 0x17460775,
+   0x1400b396, 0x7d2e23de, 0xfc1efa15, 0xee569d6d, 0x8fe551a2, 0x610d30f8, 0xfb5bfb90, 0x07f4ca11,
+   0x0f3fd5c6, 0xda2d97c5, 0x2f20e3a2, 0x655fa187, 0x38303248, 0xf5dfa6bd, 0x9d6548ca, 0x72ce87b1,
+   0x7657f74b, 0x256fa0ec, 0xb136603b, 0xb9ea9bc3, 0x317c387e, 0x1acbda11, 0x224ae8c5, 0x3e96ca16,
+   0x1169b825, 0x27573b29, 0xc1382144, 0xed2eae35, 0x4afa1b10, 0x559552fb, 0x6debac98, 0xe7b87620,
+   0x8baafa2b, 0x8a0d175b, 0x7298b62d, 0x40f34326, 0x03f2f6af, 0xc9e3b398, 0xd1cf79ab, 0xb17217f7,
+   0x00000000,
+   0xfffffffe, 0xffffffff, 0xffffffff, 0x3fffffff,
+   0x00000000
+};
+
+/* m_ln2lo_4096 = 3.295831056335979972409263591712370482480290387318041554068447002358556794466489852191171034400606574965486618500719544601490360874333956409660985754171443022594499736761689155483949956427446626758814715665406155568379407587011771069995253669673803382520170512743413366715404621750839535189877493177372601957530749580560065077132301144539434890282858650218300955858708546593612266526138285381504491308470515619898723335358172562227350488862805374417096529571040663301818107742191259390382553937306942314324996421653419738239779975254690150393279995268782571063884225597218414482849136631053165115441463944702955804892959924683860527655059256081996908425084645615765124608119831226607167353570224203706542438548892866071117899039985690041486947721987867819574417071184524858158754847055351427191715700378488643761422399288162385390243938061514623724926077455903897497050563550908601872500597159724068280556769019787450460273691539398676639686205348593334816285023338752322043158344985202419489096927057418763967773580530051777078774115624474384557697508527487624782249973023138156194367807685185106103854526855362779952992225954622322929359226329276751512390865756739883279378031391651684917432320E-720; */
+static EMUSHORT _ei_m_ln2lo_4096_[NPIR_4096] =
+{
+/* lgw                   */
+/* S i g n i f i c a n d */
+/* hgw                   */
+/* Exponent              */
+/* Sign                  */
+   0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x47c00000, 0x89437aa2,
+   0xe763da09, 0xbc670e0c, 0x6bb3b2dc, 0x3aeb27d1, 0x7017dbdf, 0x25b9d845, 0x509b11c8, 0x62feef67,
+   0xc925cb34, 0x6eef59f1, 0x2e42ac44, 0xbf68308e, 0xaf51ce09, 0x5b7492ab, 0x78d8705a, 0x0a4904f5,
+   0x21c55b83, 0x1837139d, 0x1aa54611, 0x96240799, 0x5635d889, 0x38b5cdce, 0x1f3bcbc3, 0x87313a48,
+   0x414ab16d, 0xe8afae9f, 0x8315cce6, 0x26420e46, 0xc0801839, 0xc65abd40, 0xbe5884d8, 0x354f42f4,
+   0xae41704a, 0xc833ba21, 0x7c8db80a, 0xbebcf652, 0x4242eec5, 0xfb726508, 0xf1508860, 0xae2319b4,
+   0xf3d7a488, 0x511ac728, 0x60986bff, 0x07e54e2e, 0xd549a297, 0x5dfef3c1, 0xbe635bd4, 0xf448a293,
+   0x00000000,
+   0xfffff6a8, 0xffffffff, 0xffffffff, 0x3fffffff,
+   0x00000000
+};
+
+
+/* m_ln_huge_4096 = 5.896644080637832353448603569103862109981342797205129421168157044238132582352474020247607517755710755876294554518703983944127573171770338932010866552605173924731597042276918942774378768021174637037742706128378282866132774396587094924772500961405717313793762626432369922705080163273249036823948405677526404236652707289772554807174797340474284057786933515687406626140530500681868450346731788880683307373366867905588164238515018954362395158847807987400595356702872812973188908568016513766973461720458593199927306112226451176715242016310811719825352780463117100118185406660005405323966546759930698184597194125409572488300748186435806207479215298708579069306678352176043542700030232943730129653687951177917689093573577360256617365856495946875458932929988984950979926765300832061362866573459774040864971881698293102600123331795727024276034390304022225109523550884354306461189157977124023808209697642324498400758628933734856576450245214790115892178002025009685047208616363111706026324819765163701924900554700704791451160849146304303084878839838258750654036603324097528503411969116900669235990801162356214594386672558332321135138322451425491488389560522427418471152621554552623775952950473416125767507580E+37; */
+static EMUSHORT _ei_m_ln_huge_4096_[NPIR_4096] =
+{
+/* lgw                   */
+/* S i g n i f i c a n d */
+/* hgw                   */
+/* Exponent              */
+/* Sign                  */
+   0x00000000,
+   0x0dea891f, 0x8f682625, 0x9c38339d, 0xcecb72f1,
+   0xac9f45ae, 0x5f6f7ceb, 0xe76115c0, 0x6c472096, 0xfbbd9d42, 0x972cd18b, 0xbd67c724, 0x0ab111bb,
+   0xa0c238b9, 0x473826fd, 0xd24aaebd, 0x61c1696d, 0x2413d5e3, 0x156e0c29, 0xdc4e7487, 0x95184460,
+   0x901e646a, 0xd7622658, 0xd7373958, 0xef2f0ce2, 0xc4e9207c, 0x2ac5b61c, 0xbeba7d05, 0x57339ba2,
+   0x08391a0c, 0x0060e499, 0x6af50302, 0x62136319, 0x3d0bd2f9, 0x05c128d5, 0xcee886b9, 0x36e02b20,
+   0xf3d949f2, 0x0bbb16fa, 0xc9942109, 0x422183ed, 0x8c66d3c5, 0x5e9222b8, 0x6b1ca3cf, 0x61affd44,
+   0x9538b982, 0x268a5c1f, 0xfbcf0755, 0x8d6f5177, 0x228a4ef9, 0xa17293d1, 0x731cdc8e, 0x44a02554,
+   0x30af889b, 0x96d4e6d3, 0x8f969834, 0x5570b6c6, 0x1ae273ee, 0x7598a195, 0xb365853d, 0x4d162db3,
+   0x5064c18b, 0x5f50b518, 0x1b2db31b, 0x078f735d, 0x6c606cb1, 0xae313cdb, 0xb1e17b9d, 0x955d5179,
+   0x17350d2c, 0x0c480a54, 0x5cfe7aa3, 0x074db601, 0x5e148e82, 0x6a9c7f8a, 0x3564a337, 0x25669b33,
+   0xd1d6095d, 0x4c1a1e0b, 0x9393514c, 0xcccc4e65, 0xb479cd33, 0xc943e732, 0xdb8990e5, 0x17460775,
+   0x1400b396, 0x7d2e23de, 0xfc1efa15, 0xee569d6d, 0x8fe551a2, 0x610d30f8, 0xfb5bfb90, 0x07f4ca11,
+   0x0f3fd5c6, 0xda2d97c5, 0x2f20e3a2, 0x655fa187, 0x38303248, 0xf5dfa6bd, 0x9d6548ca, 0x72ce87b1,
+   0x7657f74b, 0x256fa0ec, 0xb136603b, 0xb9ea9bc3, 0x317c387e, 0x1acbda11, 0x224ae8c5, 0x3e96ca16,
+   0x1169b825, 0x27573b29, 0xc1382144, 0xed2eae35, 0x4afa1b10, 0x559552fb, 0x6debac98, 0xe7b87620,
+   0x8baafa2b, 0x8a0d175b, 0x7298b62d, 0x40f34326, 0x03f2f6af, 0xc9e3b398, 0xd1cf79ab, 0xb17217f7,
+   0x00000000,
+   0x0000007c, 0x00000000, 0x00000000, 0x40000000,
+   0x00000000
+};
+
+/* m_ln_tiny_4096 = -5.896644080637832353448603569103862109842713361093140359284710619946497268737373993375556466931574753977615830124765040822954907772486601423610570348491036777994492995125292831367844617694159444651597191962703995828071366671808760230547830938332817722745938531397833607718667132168302208918771815586924985171379378758951706975611806931726197980686773126853278291836801558113874815989822397475428981160457637854146683742187464276434685019795674319173140581958287021674479503415486093995034821327446882246986644753495564667188693026060730505937723359525127798874151862575100499401428957450692065149660915590908751727791496255061977368904893639947944526433121821200530245682895417414039836765699858893397050474226496845367403304237278937378131228302352649600692193269971253885075438176360927736870262120947961380049417498575712813564384414421076323250900771453154665330310583637109587636687647168546071910815850292977977870272695562849772773963825551337133250356832656051218757896085642785228346515810071360148010092816161166848129231949131305788355199318550543979691272843802141467501838286763986746549083746882522555011072200162165344049411555035139488465990748515666541393651734283657512194475807E+37; */
+static EMUSHORT _ei_m_ln_tiny_4096_[NPIR_4096] =
+{
+/* lgw                   */
+/* S i g n i f i c a n d */
+/* hgw                   */
+/* Exponent              */
+/* Sign                  */
+   0x00000000,
+   0xa8f05ba9, 0x93ec3ec7, 0x612f859a, 0x6c926e3a,
+   0xceb25b9b, 0xa608f08b, 0xfc22dc9b, 0x16be92b8, 0xf5abd77a, 0x5d6b999e, 0x2b12513a, 0xfca5c64d,
+   0x8023899d, 0x9bc7c5b4, 0xefd70a84, 0xb8ff4666, 0xa320b28e, 0x5a5cd964, 0x2294a9c0, 0x1b9fdd4a,
+   0x68d56083, 0x81347572, 0xe163512f, 0x35922fcc, 0x8320501a, 0x27be9154, 0x671264f5, 0x469882d7,
+   0x1fda8241, 0xd2579def, 0xf3b0cd39, 0xab120a12, 0x9e418367, 0xa7e870fd, 0x82477e70, 0x25d40bb2,
+   0x90a2abc8, 0x172a0136, 0x70af028e, 0x34a199ca, 0xe2a107b2, 0x2a3f41bb, 0x8ca46926, 0xf6357184,
+   0x80e641b5, 0x1af5bd96, 0x62e822e0, 0x686e26d4, 0x9d0e0a1f, 0xeacb5d37, 0xf6681ae9, 0x991a6f1f,
+   0x599be928, 0xea0fda2a, 0xf46a6e48, 0xecbf4928, 0x97bc6793, 0x7b12f8d2, 0xd9f7ec62, 0x109a92ca,
+   0xed615c03, 0xedc6ce3c, 0x8c21d62d, 0x5ca4e78f, 0xb2b8034c, 0x4bf0ea3a, 0xc9eda685, 0x5aefa16e,
+   0x2690991c, 0xb7640e01, 0xb1d960e7, 0xdc18dc67, 0xcf644398, 0x09cb8f2b, 0x98ca18d5, 0xbf042806,
+   0x2e079fbe, 0x01fae476, 0xb746ca1e, 0x129c12b6, 0x14743083, 0xdfd2c842, 0xfa91c039, 0xa4911c05,
+   0x94d6267e, 0x74c49c19, 0x213f1d92, 0xaeb04cde, 0x15e6a372, 0x8fa072d0, 0x8254de79, 0xdcf7bdd8,
+   0x4dbe4382, 0x2b3061db, 0x43f69d4b, 0xceeb63fa, 0x857077ec, 0xca629f59, 0x13b246f1, 0xa379a994,
+   0xea763355, 0x4f10d062, 0x9edf1a12, 0xc5344b12, 0xa62e7754, 0xe01200c8, 0x1889dea3, 0xd5215868,
+   0xb998df9d, 0x7aaca34e, 0x51dabc81, 0xaf6afd32, 0xeda249b1, 0x052c981e, 0xd925fb2c, 0xe01e5cec,
+   0x6c1344b1, 0x3aef7a9b, 0xe41ce8cf, 0xb5628367, 0x03f2f6a9, 0xc9e3b398, 0xd1cf79ab, 0xb17217f7,
+   0x00000000,
+   0x0000007c, 0x00000000, 0x00000000, 0x40000000,
+   0xffffffff
+};
+
+
+/* m_athfhi_4096 = 4.636476090008061162142562314612144020285370542861202638109330887201978641657417053006002839848878925565298522511908375135058181816250111554715305699441056207193362661648801015325027559879258055168538891674782372865387939180125171994840139558381851150950216333064938721546097320785555572086014632275652426730521804574640086974505838973638964890026486877853780128236331217164578146836900993340528882486244562388119090158949767997197011496776001645006253016812125609335304134939663012931924274840293161119492061620844159372361273166876981687027593189510333973325929038512892545945922463215609783638009537499320948607339491864325160274827930450373317725546504996086757706227544162850222737237119744733669773185106940138112697856754348539177376911248032293593409433787166922014406125214994838028233556641326708789497284352055543107155349691745303648419491827945433069649723697027052476939532542093909799120660109271166417208646368716343940739859367841627802661046153147906814563180720852884733075449855552696894112492334436329744596672326631379438218965511954461236106905813013093968483564136941011350321961797696848609544380704499234272736109796472167662468181059361239226599804693462960428087632399E-1; */
+static EMUSHORT _ei_m_athfhi_4096_[NPIR_4096] =
+{
+/* lgw                   */
+/* S i g n i f i c a n d */
+/* hgw                   */
+/* Exponent              */
+/* Sign                  */
+   0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00ca9000, 0xb7fb97d1, 0xce4f48d4,
+   0x59314d0c, 0x0c2e88b2, 0xa412c030, 0xc950fdf8, 0x3ecf9f23, 0x25860ecb, 0xd527472f, 0x93b9ceb6,
+   0x42113e3b, 0x04ef35b3, 0x0b54957a, 0xf40339dd, 0x3447ed0c, 0x67e2298b, 0x55811a92, 0xbdc30444,
+   0x2b3329d1, 0x9c6b61e9, 0x1de2d580, 0x493bb972, 0x3889d0ba, 0x0ee6e292, 0x828e3e8f, 0xb7f9d6d6,
+   0x9c875376, 0x2a0b588f, 0x46313b0e, 0x3957e40f, 0x81c6e1b2, 0xc3ddf33a, 0xc8913e64, 0xbe2f2645,
+   0x8a75fb6a, 0x2beed3b8, 0x63c7bb3b, 0xcc47e007, 0xd9967b05, 0x333ec575, 0x12c6925e, 0x196cf7ba,
+   0xa3baf6a7, 0xf0d36426, 0x400bd856, 0x3c36a6b0, 0xbfee054d, 0xefaeb8b1, 0x4bd7be5b, 0xc1689ec3,
+   0xe1547791, 0xdfd26c5b, 0x07697538, 0x5336dd09, 0x086ccb07, 0x6ebfea02, 0x41b29b65, 0x79134753,
+   0x86228dbd, 0xd6d85e36, 0xfd3c0013, 0xcee1e80e, 0xc6a46182, 0x87c812f8, 0x892b516c, 0xfa9c5917,
+   0xe9624709, 0xe2cf16e6, 0x261cdf00, 0x6e141587, 0xbc3a8d03, 0x6fe445ec, 0x0dda7b45, 0xed63382b,
+   0x00000000,
+   0xfffffffd, 0xffffffff, 0xffffffff, 0x3fffffff,
+   0x00000000
+};
+
+/* m_athflo_4096 = 1.721038214209079224050868694454521863393438040303958278090495201039533858144916442001077045384551393808698317540361962534475793362966357591298195540972910631331937657870673401794627401519561865611595818870873274983390655903035098636739024290775635628005941976918267159696272789081453251603993555689080520031098492843130748902882694093266161939534144336130171107704014839490882464393345776522185279631810831345742373160878119831259239755280125888873105301741072945327979088922705318770029132684380087814991427180507735980005293910379777826661690561937701335691699989584543483662579079914235808923489764795569866467197582803702304647997413995665655590813204652808300636404502137748384135946008169413562371745379512073244030829624100379168752502511319335547097358589839427394040528183046415578851001954161864712656695980276962665528929284800243383132830957550856553229049277076796516873360121119729904479019895576452759030401020230239493764446374260206212298789272340534466636595196735594594013548040474870515439329228678204028863216183361932621419891996709404601709704087928126701301232752008946179849337137369555932150381427029515647612269416031594509266453239088421221953777961459194938922042083E-721; */
+static EMUSHORT _ei_m_athflo_4096_[NPIR_4096] =
+{
+/* lgw                   */
+/* S i g n i f i c a n d */
+/* hgw                   */
+/* Exponent              */
+/* Sign                  */
+   0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x5a000000, 0x2a8723e4,
+   0x2e5d9110, 0xf534ff6e, 0x2cb2bbe5, 0xd605eecb, 0x0d33b5a8, 0x31f330ec, 0x1a18fe9e, 0x85e85adf,
+   0xbd9c0bff, 0x14c9e701, 0x461eb42a, 0x23b0ee2e, 0xc096fa39, 0x14454754, 0x1e01e547, 0x8c48e4d7,
+   0xba2541d7, 0x1343c8bd, 0x4bc1d30f, 0x5940551a, 0x4c3f9b83, 0x791a26b5, 0xb3b14ac4, 0xdd8faa88,
+   0x0a74f8ee, 0xe8c939f3, 0xe7f6f8e7, 0x4546c550, 0x0cf47e8c, 0x442b3103, 0x81438c1f, 0xc317def1,
+   0x5e46591b, 0x3ec92e61, 0x8356c93c, 0xcbeb3e51, 0x484e3847, 0x409f4139, 0xab0850db, 0xb4b0667a,
+   0xfbe59b12, 0x7ef62ca3, 0x44948327, 0x1ea31834, 0x45b51fe7, 0x189609be, 0x14fc89cd, 0xcc194017,
+   0x00000000,
+   0xfffff6a4, 0xffffffff, 0xffffffff, 0x3fffffff,
+   0x00000000
+};
+
+
+/* m_at1fhi_4096 = 9.827937232473290679857106110146660144968774536316285567614250883179880715497960353897065343728173111081651397020119367662299410391818849136789053472484235494147817726770491318323960397742899020583273603878671335971023143727015051708718571210491998169977354955130446955702784127146006523683876273342062466776900806368282133137995154213438054926807812628292425427397000064880451978671316525389183601537605889851463610006587304844108929670609461747816445409852787868266196733907637534556483691934971225734289648528539944305275571864940208939678829907914401690171513981866053223273911088492146839396825405052362766323426064324358507583034942017996458916086544160540934437178400944729494308355011789414740264042496022026100246840848180606708035478227893817106408331173717131580204194781248502933999803442111015326706163794975565686083843948117109012836603736946449561808102814017293935937873618946030869864037867987384480511219650400499953166845599128986856939388964337146775676659813746635325417464997414061890357878444759109444984730849139248840988644188022276286498316618981419751706601576325951851130399172571079572974532778770462259824254195959540620770490945477043636555352320749206193412253347E-1; */
+static EMUSHORT _ei_m_at1fhi_4096_[NPIR_4096] =
+{
+/* lgw                   */
+/* S i g n i f i c a n d */
+/* hgw                   */
+/* Exponent              */
+/* Sign                  */
+   0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x25530800, 0x0a118493, 0xbd7830ef,
+   0x2d413c78, 0xd1828861, 0x221566d2, 0x406380c2, 0xcbfdcc0a, 0xb5f1dacc, 0xc174dab2, 0x6dd93875,
+   0x2b7e166d, 0x35873498, 0xc88b0f3d, 0x2b51a212, 0x2ab9ef47, 0xc186b647, 0x94c0bdb8, 0xe37dfe30,
+   0x46d42e9a, 0x59872d06, 0xbdd1cd28, 0x9ab355a9, 0x86812af7, 0xcabfe476, 0x4f3a7c24, 0xb621d83d,
+   0xa3b4c3ab, 0x6734a999, 0x8c35d25a, 0x716c0cfd, 0x5819c42e, 0xd2f76f75, 0xe8757678, 0x52e80719,
+   0x20193d87, 0x1d9d0c19, 0x50f0304d, 0xc6ae17ee, 0xbfacebae, 0x07f85e9b, 0x91375cde, 0x5d4dfa69,
+   0xcb8863ed, 0xa5f3cc4c, 0x808af180, 0x85971e55, 0xb8dfaaa1, 0x6cd5f369, 0x4d78de71, 0x096ce12b,
+   0xbb00d8ce, 0x5be952d0, 0xc31b9d4f, 0x9261b634, 0xcecf57dc, 0x818d8878, 0x643b8d55, 0x509352f1,
+   0x3fa1afbf, 0x0f08a0ae, 0x27ccc8e5, 0x4d36a7a3, 0xfadbba91, 0xf346de40, 0x179728b8, 0x8aabe367,
+   0x42088fd2, 0x351d86e9, 0x560dce43, 0xa9936652, 0xbbc9e141, 0x7887af0c, 0x0fb4d900, 0xfb985e94,
+   0x00000000,
+   0xfffffffe, 0xffffffff, 0xffffffff, 0x3fffffff,
+   0x00000000
+};
+
+/* m_at1flo_4096 = 4.936605148720390284705906251868344994876886776800960794772964521086953099510574360558270502548201409356238861163103915422353647008556571969626121945021278390135834655340750537241936411314030801185571713914771885360686226846893762811622406502836836718018125396786075288985006979601051105938904305030959713766562724731174946987202110467998873634068586944449767128530710585173008605249387480216548691304891578282232659433984193371112377569329763071093064806127684971175811502358637304023957597005314370661313284564292556054591752863207824401071277046881147586343048212496697550468175694066072183114468973074783725877678918066192336743235985492633815613620850953119803669440529280287843284062909884739878503023767384179410357181484634674631386818432456459912307896706339730911852915455096495315077899743513682577852525629945032070939729802848295306736055821736717849803924746711631870141925118840652762344393887435322678993343737217499779281818359739855962792486948359698253429016937642823952923204510590905160849709319839902363244748192720124009290498466367164080824936814434812026494486809073518811548894475490426148612948636895552690444224699626784231122445737134218738045046368515779878128757261E-720; */
+static EMUSHORT _ei_m_at1flo_4096_[NPIR_4096] =
+{
+/* lgw                   */
+/* S i g n i f i c a n d */
+/* hgw                   */
+/* Exponent              */
+/* Sign                  */
+   0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xe3200000, 0x92e8e3b1,
+   0xcaf73138, 0x2efd89fb, 0xcf6f26b1, 0x2b9aad83, 0x6e76cebf, 0x0888268d, 0xdfec921a, 0xcacbc6c9,
+   0x93499342, 0x7ed36da2, 0xb4c7884b, 0x6688bc75, 0x4104a070, 0x17309fd0, 0x0c8bede8, 0xfa9062f1,
+   0x4b541c02, 0xfacfea82, 0x583e6f8a, 0x8db1c741, 0x4af495db, 0x7faf9d02, 0x311b4af3, 0x96df3f21,
+   0x4efea62b, 0xdf671272, 0xd750070a, 0x124aa08b, 0x837764ba, 0x7aaf3a13, 0xbfaa9ebc, 0x95023abc,
+   0x40cdbce4, 0x8d77503a, 0x0e5b7fb3, 0x179b09b0, 0x32196714, 0xffab476d, 0x1d328101, 0xd91899f1,
+   0x0f363125, 0x08c6fd61, 0xf9af79e1, 0x7f82967c, 0xc6751d7d, 0x078d7ebc, 0x3177572f, 0xb6f2b94d,
+   0x00000000,
+   0xfffff6a9, 0xffffffff, 0xffffffff, 0x3fffffff,
+   0x00000000
+};
+
+
+/* m_39_16__4096 = 2.4375000E+0; */
+static EMUSHORT _ei_m_39_16__4096_[NPIR_4096] =
+{
+/* lgw                   */
+/* S i g n i f i c a n d */
+/* hgw                   */
+/* Exponent              */
+/* Sign                  */
+   0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x9c000000,
+   0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x40000000,
+   0x00000000
+};
+
+/* m_1_16__4096 = 6.2500000E-2; */
+static EMUSHORT _ei_m_1_16__4096_[NPIR_4096] =
+{
+/* lgw                   */
+/* S i g n i f i c a n d */
+/* hgw                   */
+/* Exponent              */
+/* Sign                  */
+   0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x80000000,
+   0x00000000,
+   0xfffffffb, 0xffffffff, 0xffffffff, 0x3fffffff,
+   0x00000000
+};
+
+
+/* m_thovfl_4096 = 1.375204006230931493883788528973022311061792266570746424175429138834892945987874315762032840760894676083330938344812240495632072147744131025152818771243990708470563500523488927417569164629801080166708726628883163943194415022742600244665217268561072532819351773698766077127511419025742810489104864854781013884833591057234553076292991110274496852820541162740122916032059562110299486523569342405042884579397165988816351365466291049683197299113101764137631312698676172653171360678610394174503365983280805641765283855704853868340812757322256666751572885947647239706567883062248141944251779159228382078657270854905494665305680787277091906409977370054527705448841875462444735103923038707701003491262632734213490829906152446674854316273669415508771289699220555335627520826643290687703001865542540970259567760758823346437537971957500440018315457452943206821498740699881990780232364116308236765281292547248203732684630618831713824769694374040033702813042493994457897576666723098862935394887212563553160017155812973386004465864953651204216420123122411281202792942831825123009405022704032879950735933109460662594661814433896265651205780545749937232428064602405446644475199866800723681364596608581118670672175E+3; */
+static EMUSHORT _ei_m_thovfl_4096_[NPIR_4096] =
+{
+/* lgw                   */
+/* S i g n i f i c a n d */
+/* hgw                   */
+/* Exponent              */
+/* Sign                  */
+   0x00000000,
+   0xe57b34d6, 0xa2ece4f3, 0x0f567200, 0x5855175a,
+   0x4f3a4b81, 0x5c740104, 0x30260d12, 0x58e4e792, 0x9bdfb058, 0x72736aff, 0xdf7c88eb, 0x425b892d,
+   0xb3bc26f3, 0x5cfe65c5, 0x63b85947, 0x46b35e22, 0xdaf33734, 0xdcc29bc7, 0xd56c00e2, 0x406f823d,
+   0xcb9d7147, 0x10a71525, 0xc07d7f8e, 0x07b5947b, 0xdec1d779, 0x016f886b, 0xa8c4a91d, 0xf479fec5,
+   0x3ff7513b, 0xf05ddd74, 0x9f9d5ae9, 0x9702c800, 0x93237461, 0x3d931f8e, 0xc8714283, 0xa52929c7,
+   0x1c3a7fa2, 0xc35d3e43, 0x5b478000, 0x181077ce, 0xc8039d27, 0xe39d91a2, 0x47c3beb0, 0x4ea27d5a,
+   0x988ef3b6, 0x7d56093e, 0x3bf08f1a, 0xc103d6ec, 0x9975fc81, 0x2c66ff32, 0xcf83f5aa, 0x6a7b2429,
+   0x972a0c56, 0xf21e3f9c, 0x5b19e372, 0xe2c53110, 0x720b604e, 0x89ebdc88, 0x15ca5913, 0xf2ad7c46,
+   0x8de19b7e, 0x84562f6f, 0x32544582, 0x7f52f7c2, 0x90fd694b, 0xc0bfb2f4, 0xe4526fc0, 0x30b266ed,
+   0x767b64c3, 0xf3e5ca01, 0x521686cd, 0xf7134851, 0x0b23ea0d, 0xaf479b8e, 0x9bb97e1d, 0x3c3b6659,
+   0x73475912, 0xe9b94d1b, 0x66f6b6c1, 0x2e65ebf2, 0x1ed5feca, 0x9af9c7f9, 0x2cad445e, 0x668bd73a,
+   0x2360adf9, 0xd144b2bf, 0x8c3e0244, 0xd6e3e882, 0xcb662715, 0xde04c770, 0x6b811bb3, 0xd7b523c1,
+   0xe6c5d717, 0xc35c2b06, 0xf5a7dc85, 0x2234a47a, 0x4e6eb0b6, 0x9e30a987, 0x107a1e84, 0x17381374,
+   0x12a53791, 0x4c4423e5, 0x93acad39, 0xc41b46e5, 0xa7f056ba, 0xf1f57b40, 0x7138917e, 0x14a213c5,
+   0xc8de6a64, 0x061c814f, 0x132e603a, 0x65c538c4, 0x70a24a38, 0x92e8a863, 0x6a7c4f33, 0x887ab26f,
+   0xaf4da25a, 0x1dbcaea0, 0x3f03f07c, 0xc6eba90d, 0x43d35ef9, 0x6b9495fb, 0x1340fdde, 0xabe68738,
+   0x00000000,
+   0x00000009, 0x00000000, 0x00000000, 0x40000000,
+   0x00000000
+};
+
+#else  /* BITS_PER_EMUSHORT != 32 */
+#error ei_service_032_emu32lsb.dfn: ERROR: Failed size of EMUSHORT data type.
+#endif /* BITS_PER_EMUSHORT == 32 */
+
+#endif /* __REAL_EINTERNAL_SERVICE_032_32LSB */
diff --git a/mpu/math/service/emu04096/ei_service_032_emu32msb.dfn b/mpu/math/service/emu04096/ei_service_032_emu32msb.dfn
new file mode 100644
index 0000000..bfd6050
--- /dev/null
+++ b/mpu/math/service/emu04096/ei_service_032_emu32msb.dfn
@@ -0,0 +1,346 @@
+
+#ifndef   __REAL_EINTERNAL_SERVICE_032_32MSB
+#define   __REAL_EINTERNAL_SERVICE_032_32MSB
+
+#if BITS_PER_EMUSHORT == 32
+
+/* m_ln2hi_4096 = 6.931471805599453094172321214581765680755001343602552541206800094933936219696947156058633269964186875420014810205706857336855202357581305570326707516350759619307275708283714351903070386238916734711233501153644979552391204751726815749320651555247341395258829504530070953263666426541042391578149520437404303855008019441706416715186447128399681717845469570262716310645461502572074024816377733896385506952606683411372738737229289564935470257626520988596932019650585547647033067936544325476327449512504060694381471046899465062201677204245245296126879465461931651746813926725041038025462596568691441928716082938031727143677826548775664850856740776484514644399404614226031930967354025744460703080960850474866385231381816767514353716455915549014647327219025191494910685133643405711994607190977124967637833895625383382587132905810327190358921521554706904967359184124824714639597217607617990311509865705462316411144549217360001695432531291468679627360836001212978966700534729198346851696521822739080628298317839252763043089306903951421031648769932359435936302708473079053362317697288305296644719028997071249283638891510581455345008946788105131881707227762308405146700080952307863719001651531779878344487975E-1; */
+static EMUSHORT _ei_m_ln2hi_4096_[NPIR_4096] =
+{
+/* Sign                  */
+/* Exponent              */
+/* hgw                   */
+/* S i g n i f i c a n d */
+/* lgw                   */
+   0x00000000,
+   0x3fffffff, 0xffffffff, 0xffffffff, 0xfffffffe,
+   0x00000000,
+   0xb17217f7, 0xd1cf79ab, 0xc9e3b398, 0x03f2f6af, 0x40f34326, 0x7298b62d, 0x8a0d175b, 0x8baafa2b,
+   0xe7b87620, 0x6debac98, 0x559552fb, 0x4afa1b10, 0xed2eae35, 0xc1382144, 0x27573b29, 0x1169b825,
+   0x3e96ca16, 0x224ae8c5, 0x1acbda11, 0x317c387e, 0xb9ea9bc3, 0xb136603b, 0x256fa0ec, 0x7657f74b,
+   0x72ce87b1, 0x9d6548ca, 0xf5dfa6bd, 0x38303248, 0x655fa187, 0x2f20e3a2, 0xda2d97c5, 0x0f3fd5c6,
+   0x07f4ca11, 0xfb5bfb90, 0x610d30f8, 0x8fe551a2, 0xee569d6d, 0xfc1efa15, 0x7d2e23de, 0x1400b396,
+   0x17460775, 0xdb8990e5, 0xc943e732, 0xb479cd33, 0xcccc4e65, 0x9393514c, 0x4c1a1e0b, 0xd1d6095d,
+   0x25669b33, 0x3564a337, 0x6a9c7f8a, 0x5e148e82, 0x074db601, 0x5cfe7aa3, 0x0c480a54, 0x17350d2c,
+   0x955d5179, 0xb1e17b9d, 0xae313cdb, 0x6c606cb1, 0x078f735d, 0x1b2db31b, 0x5f50b518, 0x5064c18b,
+   0x4d162db3, 0xb365853d, 0x7598a195, 0x1ae273ee, 0x5570b6c6, 0x8f969834, 0x96d4e6d3, 0x30af889b,
+   0x44a02554, 0x731cdc8e, 0xa1729000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000
+};
+
+/* m_ln2lo_4096 = 3.295831056335979972409263591712370482480290387318041554068447002358556794466489852191171034400606574965486618500719544601490360874333956409660985754171443022594499736761689155483949956427446626758814715665406155568379407587011771069995253669673803382520170512743413366715404621750839535189877493177372601957530749580560065077132301144539434890282858650218300955858708546593612266526138285381504491308470515619898723335358172562227350488862805374417096529571040663301818107742191259390382553937306942314324996421653419738239779975254690150393279995268782571063884225597218414482849136631053165115441463944702955804892959924683860527655059256081996908425084645615765124608119831226607167353570224203706542438548892866071117899039985690041486947721987867819574417071184524858158754847055351427191715700378488643761422399288162385390243938061514623724926077455903897497050563550908601872500597159724068280556769019787450460273691539398676639686205348593334816285023338752322043158344985202419489096927057418763967773580530051777078774115624474384557697508527487624782249973023138156194367807685185106103854526855362779952992225954622322929359226329276751512390865756739883279378031391651684917432320E-720; */
+static EMUSHORT _ei_m_ln2lo_4096_[NPIR_4096] =
+{
+/* Sign                  */
+/* Exponent              */
+/* hgw                   */
+/* S i g n i f i c a n d */
+/* lgw                   */
+   0x00000000,
+   0x3fffffff, 0xffffffff, 0xffffffff, 0xfffff6a8,
+   0x00000000,
+   0xf448a293, 0xbe635bd4, 0x5dfef3c1, 0xd549a297, 0x07e54e2e, 0x60986bff, 0x511ac728, 0xf3d7a488,
+   0xae2319b4, 0xf1508860, 0xfb726508, 0x4242eec5, 0xbebcf652, 0x7c8db80a, 0xc833ba21, 0xae41704a,
+   0x354f42f4, 0xbe5884d8, 0xc65abd40, 0xc0801839, 0x26420e46, 0x8315cce6, 0xe8afae9f, 0x414ab16d,
+   0x87313a48, 0x1f3bcbc3, 0x38b5cdce, 0x5635d889, 0x96240799, 0x1aa54611, 0x1837139d, 0x21c55b83,
+   0x0a4904f5, 0x78d8705a, 0x5b7492ab, 0xaf51ce09, 0xbf68308e, 0x2e42ac44, 0x6eef59f1, 0xc925cb34,
+   0x62feef67, 0x509b11c8, 0x25b9d845, 0x7017dbdf, 0x3aeb27d1, 0x6bb3b2dc, 0xbc670e0c, 0xe763da09,
+   0x89437aa2, 0x47c00000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000
+};
+
+
+/* m_ln_huge_4096 = 5.896644080637832353448603569103862109981342797205129421168157044238132582352474020247607517755710755876294554518703983944127573171770338932010866552605173924731597042276918942774378768021174637037742706128378282866132774396587094924772500961405717313793762626432369922705080163273249036823948405677526404236652707289772554807174797340474284057786933515687406626140530500681868450346731788880683307373366867905588164238515018954362395158847807987400595356702872812973188908568016513766973461720458593199927306112226451176715242016310811719825352780463117100118185406660005405323966546759930698184597194125409572488300748186435806207479215298708579069306678352176043542700030232943730129653687951177917689093573577360256617365856495946875458932929988984950979926765300832061362866573459774040864971881698293102600123331795727024276034390304022225109523550884354306461189157977124023808209697642324498400758628933734856576450245214790115892178002025009685047208616363111706026324819765163701924900554700704791451160849146304303084878839838258750654036603324097528503411969116900669235990801162356214594386672558332321135138322451425491488389560522427418471152621554552623775952950473416125767507580E+37; */
+static EMUSHORT _ei_m_ln_huge_4096_[NPIR_4096] =
+{
+/* Sign                  */
+/* Exponent              */
+/* hgw                   */
+/* S i g n i f i c a n d */
+/* lgw                   */
+   0x00000000,
+   0x40000000, 0x00000000, 0x00000000, 0x0000007c,
+   0x00000000,
+   0xb17217f7, 0xd1cf79ab, 0xc9e3b398, 0x03f2f6af, 0x40f34326, 0x7298b62d, 0x8a0d175b, 0x8baafa2b,
+   0xe7b87620, 0x6debac98, 0x559552fb, 0x4afa1b10, 0xed2eae35, 0xc1382144, 0x27573b29, 0x1169b825,
+   0x3e96ca16, 0x224ae8c5, 0x1acbda11, 0x317c387e, 0xb9ea9bc3, 0xb136603b, 0x256fa0ec, 0x7657f74b,
+   0x72ce87b1, 0x9d6548ca, 0xf5dfa6bd, 0x38303248, 0x655fa187, 0x2f20e3a2, 0xda2d97c5, 0x0f3fd5c6,
+   0x07f4ca11, 0xfb5bfb90, 0x610d30f8, 0x8fe551a2, 0xee569d6d, 0xfc1efa15, 0x7d2e23de, 0x1400b396,
+   0x17460775, 0xdb8990e5, 0xc943e732, 0xb479cd33, 0xcccc4e65, 0x9393514c, 0x4c1a1e0b, 0xd1d6095d,
+   0x25669b33, 0x3564a337, 0x6a9c7f8a, 0x5e148e82, 0x074db601, 0x5cfe7aa3, 0x0c480a54, 0x17350d2c,
+   0x955d5179, 0xb1e17b9d, 0xae313cdb, 0x6c606cb1, 0x078f735d, 0x1b2db31b, 0x5f50b518, 0x5064c18b,
+   0x4d162db3, 0xb365853d, 0x7598a195, 0x1ae273ee, 0x5570b6c6, 0x8f969834, 0x96d4e6d3, 0x30af889b,
+   0x44a02554, 0x731cdc8e, 0xa17293d1, 0x228a4ef9, 0x8d6f5177, 0xfbcf0755, 0x268a5c1f, 0x9538b982,
+   0x61affd44, 0x6b1ca3cf, 0x5e9222b8, 0x8c66d3c5, 0x422183ed, 0xc9942109, 0x0bbb16fa, 0xf3d949f2,
+   0x36e02b20, 0xcee886b9, 0x05c128d5, 0x3d0bd2f9, 0x62136319, 0x6af50302, 0x0060e499, 0x08391a0c,
+   0x57339ba2, 0xbeba7d05, 0x2ac5b61c, 0xc4e9207c, 0xef2f0ce2, 0xd7373958, 0xd7622658, 0x901e646a,
+   0x95184460, 0xdc4e7487, 0x156e0c29, 0x2413d5e3, 0x61c1696d, 0xd24aaebd, 0x473826fd, 0xa0c238b9,
+   0x0ab111bb, 0xbd67c724, 0x972cd18b, 0xfbbd9d42, 0x6c472096, 0xe76115c0, 0x5f6f7ceb, 0xac9f45ae,
+   0xcecb72f1, 0x9c38339d, 0x8f682625, 0x0dea891f,
+   0x00000000
+};
+
+/* m_ln_tiny_4096 = -5.896644080637832353448603569103862109842713361093140359284710619946497268737373993375556466931574753977615830124765040822954907772486601423610570348491036777994492995125292831367844617694159444651597191962703995828071366671808760230547830938332817722745938531397833607718667132168302208918771815586924985171379378758951706975611806931726197980686773126853278291836801558113874815989822397475428981160457637854146683742187464276434685019795674319173140581958287021674479503415486093995034821327446882246986644753495564667188693026060730505937723359525127798874151862575100499401428957450692065149660915590908751727791496255061977368904893639947944526433121821200530245682895417414039836765699858893397050474226496845367403304237278937378131228302352649600692193269971253885075438176360927736870262120947961380049417498575712813564384414421076323250900771453154665330310583637109587636687647168546071910815850292977977870272695562849772773963825551337133250356832656051218757896085642785228346515810071360148010092816161166848129231949131305788355199318550543979691272843802141467501838286763986746549083746882522555011072200162165344049411555035139488465990748515666541393651734283657512194475807E+37; */
+static EMUSHORT _ei_m_ln_tiny_4096_[NPIR_4096] =
+{
+/* Sign                  */
+/* Exponent              */
+/* hgw                   */
+/* S i g n i f i c a n d */
+/* lgw                   */
+   0xffffffff,
+   0x40000000, 0x00000000, 0x00000000, 0x0000007c,
+   0x00000000,
+   0xb17217f7, 0xd1cf79ab, 0xc9e3b398, 0x03f2f6a9, 0xb5628367, 0xe41ce8cf, 0x3aef7a9b, 0x6c1344b1,
+   0xe01e5cec, 0xd925fb2c, 0x052c981e, 0xeda249b1, 0xaf6afd32, 0x51dabc81, 0x7aaca34e, 0xb998df9d,
+   0xd5215868, 0x1889dea3, 0xe01200c8, 0xa62e7754, 0xc5344b12, 0x9edf1a12, 0x4f10d062, 0xea763355,
+   0xa379a994, 0x13b246f1, 0xca629f59, 0x857077ec, 0xceeb63fa, 0x43f69d4b, 0x2b3061db, 0x4dbe4382,
+   0xdcf7bdd8, 0x8254de79, 0x8fa072d0, 0x15e6a372, 0xaeb04cde, 0x213f1d92, 0x74c49c19, 0x94d6267e,
+   0xa4911c05, 0xfa91c039, 0xdfd2c842, 0x14743083, 0x129c12b6, 0xb746ca1e, 0x01fae476, 0x2e079fbe,
+   0xbf042806, 0x98ca18d5, 0x09cb8f2b, 0xcf644398, 0xdc18dc67, 0xb1d960e7, 0xb7640e01, 0x2690991c,
+   0x5aefa16e, 0xc9eda685, 0x4bf0ea3a, 0xb2b8034c, 0x5ca4e78f, 0x8c21d62d, 0xedc6ce3c, 0xed615c03,
+   0x109a92ca, 0xd9f7ec62, 0x7b12f8d2, 0x97bc6793, 0xecbf4928, 0xf46a6e48, 0xea0fda2a, 0x599be928,
+   0x991a6f1f, 0xf6681ae9, 0xeacb5d37, 0x9d0e0a1f, 0x686e26d4, 0x62e822e0, 0x1af5bd96, 0x80e641b5,
+   0xf6357184, 0x8ca46926, 0x2a3f41bb, 0xe2a107b2, 0x34a199ca, 0x70af028e, 0x172a0136, 0x90a2abc8,
+   0x25d40bb2, 0x82477e70, 0xa7e870fd, 0x9e418367, 0xab120a12, 0xf3b0cd39, 0xd2579def, 0x1fda8241,
+   0x469882d7, 0x671264f5, 0x27be9154, 0x8320501a, 0x35922fcc, 0xe163512f, 0x81347572, 0x68d56083,
+   0x1b9fdd4a, 0x2294a9c0, 0x5a5cd964, 0xa320b28e, 0xb8ff4666, 0xefd70a84, 0x9bc7c5b4, 0x8023899d,
+   0xfca5c64d, 0x2b12513a, 0x5d6b999e, 0xf5abd77a, 0x16be92b8, 0xfc22dc9b, 0xa608f08b, 0xceb25b9b,
+   0x6c926e3a, 0x612f859a, 0x93ec3ec7, 0xa8f05ba9,
+   0x00000000
+};
+
+
+/* m_athfhi_4096 = 4.636476090008061162142562314612144020285370542861202638109330887201978641657417053006002839848878925565298522511908375135058181816250111554715305699441056207193362661648801015325027559879258055168538891674782372865387939180125171994840139558381851150950216333064938721546097320785555572086014632275652426730521804574640086974505838973638964890026486877853780128236331217164578146836900993340528882486244562388119090158949767997197011496776001645006253016812125609335304134939663012931924274840293161119492061620844159372361273166876981687027593189510333973325929038512892545945922463215609783638009537499320948607339491864325160274827930450373317725546504996086757706227544162850222737237119744733669773185106940138112697856754348539177376911248032293593409433787166922014406125214994838028233556641326708789497284352055543107155349691745303648419491827945433069649723697027052476939532542093909799120660109271166417208646368716343940739859367841627802661046153147906814563180720852884733075449855552696894112492334436329744596672326631379438218965511954461236106905813013093968483564136941011350321961797696848609544380704499234272736109796472167662468181059361239226599804693462960428087632399E-1; */
+static EMUSHORT _ei_m_athfhi_4096_[NPIR_4096] =
+{
+/* Sign                  */
+/* Exponent              */
+/* hgw                   */
+/* S i g n i f i c a n d */
+/* lgw                   */
+   0x00000000,
+   0x3fffffff, 0xffffffff, 0xffffffff, 0xfffffffd,
+   0x00000000,
+   0xed63382b, 0x0dda7b45, 0x6fe445ec, 0xbc3a8d03, 0x6e141587, 0x261cdf00, 0xe2cf16e6, 0xe9624709,
+   0xfa9c5917, 0x892b516c, 0x87c812f8, 0xc6a46182, 0xcee1e80e, 0xfd3c0013, 0xd6d85e36, 0x86228dbd,
+   0x79134753, 0x41b29b65, 0x6ebfea02, 0x086ccb07, 0x5336dd09, 0x07697538, 0xdfd26c5b, 0xe1547791,
+   0xc1689ec3, 0x4bd7be5b, 0xefaeb8b1, 0xbfee054d, 0x3c36a6b0, 0x400bd856, 0xf0d36426, 0xa3baf6a7,
+   0x196cf7ba, 0x12c6925e, 0x333ec575, 0xd9967b05, 0xcc47e007, 0x63c7bb3b, 0x2beed3b8, 0x8a75fb6a,
+   0xbe2f2645, 0xc8913e64, 0xc3ddf33a, 0x81c6e1b2, 0x3957e40f, 0x46313b0e, 0x2a0b588f, 0x9c875376,
+   0xb7f9d6d6, 0x828e3e8f, 0x0ee6e292, 0x3889d0ba, 0x493bb972, 0x1de2d580, 0x9c6b61e9, 0x2b3329d1,
+   0xbdc30444, 0x55811a92, 0x67e2298b, 0x3447ed0c, 0xf40339dd, 0x0b54957a, 0x04ef35b3, 0x42113e3b,
+   0x93b9ceb6, 0xd527472f, 0x25860ecb, 0x3ecf9f23, 0xc950fdf8, 0xa412c030, 0x0c2e88b2, 0x59314d0c,
+   0xce4f48d4, 0xb7fb97d1, 0x00ca9000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000
+};
+
+/* m_athflo_4096 = 1.721038214209079224050868694454521863393438040303958278090495201039533858144916442001077045384551393808698317540361962534475793362966357591298195540972910631331937657870673401794627401519561865611595818870873274983390655903035098636739024290775635628005941976918267159696272789081453251603993555689080520031098492843130748902882694093266161939534144336130171107704014839490882464393345776522185279631810831345742373160878119831259239755280125888873105301741072945327979088922705318770029132684380087814991427180507735980005293910379777826661690561937701335691699989584543483662579079914235808923489764795569866467197582803702304647997413995665655590813204652808300636404502137748384135946008169413562371745379512073244030829624100379168752502511319335547097358589839427394040528183046415578851001954161864712656695980276962665528929284800243383132830957550856553229049277076796516873360121119729904479019895576452759030401020230239493764446374260206212298789272340534466636595196735594594013548040474870515439329228678204028863216183361932621419891996709404601709704087928126701301232752008946179849337137369555932150381427029515647612269416031594509266453239088421221953777961459194938922042083E-721; */
+static EMUSHORT _ei_m_athflo_4096_[NPIR_4096] =
+{
+/* Sign                  */
+/* Exponent              */
+/* hgw                   */
+/* S i g n i f i c a n d */
+/* lgw                   */
+   0x00000000,
+   0x3fffffff, 0xffffffff, 0xffffffff, 0xfffff6a4,
+   0x00000000,
+   0xcc194017, 0x14fc89cd, 0x189609be, 0x45b51fe7, 0x1ea31834, 0x44948327, 0x7ef62ca3, 0xfbe59b12,
+   0xb4b0667a, 0xab0850db, 0x409f4139, 0x484e3847, 0xcbeb3e51, 0x8356c93c, 0x3ec92e61, 0x5e46591b,
+   0xc317def1, 0x81438c1f, 0x442b3103, 0x0cf47e8c, 0x4546c550, 0xe7f6f8e7, 0xe8c939f3, 0x0a74f8ee,
+   0xdd8faa88, 0xb3b14ac4, 0x791a26b5, 0x4c3f9b83, 0x5940551a, 0x4bc1d30f, 0x1343c8bd, 0xba2541d7,
+   0x8c48e4d7, 0x1e01e547, 0x14454754, 0xc096fa39, 0x23b0ee2e, 0x461eb42a, 0x14c9e701, 0xbd9c0bff,
+   0x85e85adf, 0x1a18fe9e, 0x31f330ec, 0x0d33b5a8, 0xd605eecb, 0x2cb2bbe5, 0xf534ff6e, 0x2e5d9110,
+   0x2a8723e4, 0x5a000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000
+};
+
+
+/* m_at1fhi_4096 = 9.827937232473290679857106110146660144968774536316285567614250883179880715497960353897065343728173111081651397020119367662299410391818849136789053472484235494147817726770491318323960397742899020583273603878671335971023143727015051708718571210491998169977354955130446955702784127146006523683876273342062466776900806368282133137995154213438054926807812628292425427397000064880451978671316525389183601537605889851463610006587304844108929670609461747816445409852787868266196733907637534556483691934971225734289648528539944305275571864940208939678829907914401690171513981866053223273911088492146839396825405052362766323426064324358507583034942017996458916086544160540934437178400944729494308355011789414740264042496022026100246840848180606708035478227893817106408331173717131580204194781248502933999803442111015326706163794975565686083843948117109012836603736946449561808102814017293935937873618946030869864037867987384480511219650400499953166845599128986856939388964337146775676659813746635325417464997414061890357878444759109444984730849139248840988644188022276286498316618981419751706601576325951851130399172571079572974532778770462259824254195959540620770490945477043636555352320749206193412253347E-1; */
+static EMUSHORT _ei_m_at1fhi_4096_[NPIR_4096] =
+{
+/* Sign                  */
+/* Exponent              */
+/* hgw                   */
+/* S i g n i f i c a n d */
+/* lgw                   */
+   0x00000000,
+   0x3fffffff, 0xffffffff, 0xffffffff, 0xfffffffe,
+   0x00000000,
+   0xfb985e94, 0x0fb4d900, 0x7887af0c, 0xbbc9e141, 0xa9936652, 0x560dce43, 0x351d86e9, 0x42088fd2,
+   0x8aabe367, 0x179728b8, 0xf346de40, 0xfadbba91, 0x4d36a7a3, 0x27ccc8e5, 0x0f08a0ae, 0x3fa1afbf,
+   0x509352f1, 0x643b8d55, 0x818d8878, 0xcecf57dc, 0x9261b634, 0xc31b9d4f, 0x5be952d0, 0xbb00d8ce,
+   0x096ce12b, 0x4d78de71, 0x6cd5f369, 0xb8dfaaa1, 0x85971e55, 0x808af180, 0xa5f3cc4c, 0xcb8863ed,
+   0x5d4dfa69, 0x91375cde, 0x07f85e9b, 0xbfacebae, 0xc6ae17ee, 0x50f0304d, 0x1d9d0c19, 0x20193d87,
+   0x52e80719, 0xe8757678, 0xd2f76f75, 0x5819c42e, 0x716c0cfd, 0x8c35d25a, 0x6734a999, 0xa3b4c3ab,
+   0xb621d83d, 0x4f3a7c24, 0xcabfe476, 0x86812af7, 0x9ab355a9, 0xbdd1cd28, 0x59872d06, 0x46d42e9a,
+   0xe37dfe30, 0x94c0bdb8, 0xc186b647, 0x2ab9ef47, 0x2b51a212, 0xc88b0f3d, 0x35873498, 0x2b7e166d,
+   0x6dd93875, 0xc174dab2, 0xb5f1dacc, 0xcbfdcc0a, 0x406380c2, 0x221566d2, 0xd1828861, 0x2d413c78,
+   0xbd7830ef, 0x0a118493, 0x25530800, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000
+};
+
+/* m_at1flo_4096 = 4.936605148720390284705906251868344994876886776800960794772964521086953099510574360558270502548201409356238861163103915422353647008556571969626121945021278390135834655340750537241936411314030801185571713914771885360686226846893762811622406502836836718018125396786075288985006979601051105938904305030959713766562724731174946987202110467998873634068586944449767128530710585173008605249387480216548691304891578282232659433984193371112377569329763071093064806127684971175811502358637304023957597005314370661313284564292556054591752863207824401071277046881147586343048212496697550468175694066072183114468973074783725877678918066192336743235985492633815613620850953119803669440529280287843284062909884739878503023767384179410357181484634674631386818432456459912307896706339730911852915455096495315077899743513682577852525629945032070939729802848295306736055821736717849803924746711631870141925118840652762344393887435322678993343737217499779281818359739855962792486948359698253429016937642823952923204510590905160849709319839902363244748192720124009290498466367164080824936814434812026494486809073518811548894475490426148612948636895552690444224699626784231122445737134218738045046368515779878128757261E-720; */
+static EMUSHORT _ei_m_at1flo_4096_[NPIR_4096] =
+{
+/* Sign                  */
+/* Exponent              */
+/* hgw                   */
+/* S i g n i f i c a n d */
+/* lgw                   */
+   0x00000000,
+   0x3fffffff, 0xffffffff, 0xffffffff, 0xfffff6a9,
+   0x00000000,
+   0xb6f2b94d, 0x3177572f, 0x078d7ebc, 0xc6751d7d, 0x7f82967c, 0xf9af79e1, 0x08c6fd61, 0x0f363125,
+   0xd91899f1, 0x1d328101, 0xffab476d, 0x32196714, 0x179b09b0, 0x0e5b7fb3, 0x8d77503a, 0x40cdbce4,
+   0x95023abc, 0xbfaa9ebc, 0x7aaf3a13, 0x837764ba, 0x124aa08b, 0xd750070a, 0xdf671272, 0x4efea62b,
+   0x96df3f21, 0x311b4af3, 0x7faf9d02, 0x4af495db, 0x8db1c741, 0x583e6f8a, 0xfacfea82, 0x4b541c02,
+   0xfa9062f1, 0x0c8bede8, 0x17309fd0, 0x4104a070, 0x6688bc75, 0xb4c7884b, 0x7ed36da2, 0x93499342,
+   0xcacbc6c9, 0xdfec921a, 0x0888268d, 0x6e76cebf, 0x2b9aad83, 0xcf6f26b1, 0x2efd89fb, 0xcaf73138,
+   0x92e8e3b1, 0xe3200000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000
+};
+
+
+/* m_39_16__4096 = 2.4375000E+0; */
+static EMUSHORT _ei_m_39_16__4096_[NPIR_4096] =
+{
+/* Sign                  */
+/* Exponent              */
+/* hgw                   */
+/* S i g n i f i c a n d */
+/* lgw                   */
+   0x00000000,
+   0x40000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000,
+   0x9c000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000
+};
+
+/* m_1_16__4096 = 6.2500000E-2; */
+static EMUSHORT _ei_m_1_16__4096_[NPIR_4096] =
+{
+/* Sign                  */
+/* Exponent              */
+/* hgw                   */
+/* S i g n i f i c a n d */
+/* lgw                   */
+   0x00000000,
+   0x3fffffff, 0xffffffff, 0xffffffff, 0xfffffffb,
+   0x00000000,
+   0x80000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000, 0x00000000, 0x00000000, 0x00000000,
+   0x00000000
+};
+
+
+/* m_thovfl_4096 = 1.375204006230931493883788528973022311061792266570746424175429138834892945987874315762032840760894676083330938344812240495632072147744131025152818771243990708470563500523488927417569164629801080166708726628883163943194415022742600244665217268561072532819351773698766077127511419025742810489104864854781013884833591057234553076292991110274496852820541162740122916032059562110299486523569342405042884579397165988816351365466291049683197299113101764137631312698676172653171360678610394174503365983280805641765283855704853868340812757322256666751572885947647239706567883062248141944251779159228382078657270854905494665305680787277091906409977370054527705448841875462444735103923038707701003491262632734213490829906152446674854316273669415508771289699220555335627520826643290687703001865542540970259567760758823346437537971957500440018315457452943206821498740699881990780232364116308236765281292547248203732684630618831713824769694374040033702813042493994457897576666723098862935394887212563553160017155812973386004465864953651204216420123122411281202792942831825123009405022704032879950735933109460662594661814433896265651205780545749937232428064602405446644475199866800723681364596608581118670672175E+3; */
+static EMUSHORT _ei_m_thovfl_4096_[NPIR_4096] =
+{
+/* Sign                  */
+/* Exponent              */
+/* hgw                   */
+/* S i g n i f i c a n d */
+/* lgw                   */
+   0x00000000,
+   0x40000000, 0x00000000, 0x00000000, 0x00000009,
+   0x00000000,
+   0xabe68738, 0x1340fdde, 0x6b9495fb, 0x43d35ef9, 0xc6eba90d, 0x3f03f07c, 0x1dbcaea0, 0xaf4da25a,
+   0x887ab26f, 0x6a7c4f33, 0x92e8a863, 0x70a24a38, 0x65c538c4, 0x132e603a, 0x061c814f, 0xc8de6a64,
+   0x14a213c5, 0x7138917e, 0xf1f57b40, 0xa7f056ba, 0xc41b46e5, 0x93acad39, 0x4c4423e5, 0x12a53791,
+   0x17381374, 0x107a1e84, 0x9e30a987, 0x4e6eb0b6, 0x2234a47a, 0xf5a7dc85, 0xc35c2b06, 0xe6c5d717,
+   0xd7b523c1, 0x6b811bb3, 0xde04c770, 0xcb662715, 0xd6e3e882, 0x8c3e0244, 0xd144b2bf, 0x2360adf9,
+   0x668bd73a, 0x2cad445e, 0x9af9c7f9, 0x1ed5feca, 0x2e65ebf2, 0x66f6b6c1, 0xe9b94d1b, 0x73475912,
+   0x3c3b6659, 0x9bb97e1d, 0xaf479b8e, 0x0b23ea0d, 0xf7134851, 0x521686cd, 0xf3e5ca01, 0x767b64c3,
+   0x30b266ed, 0xe4526fc0, 0xc0bfb2f4, 0x90fd694b, 0x7f52f7c2, 0x32544582, 0x84562f6f, 0x8de19b7e,
+   0xf2ad7c46, 0x15ca5913, 0x89ebdc88, 0x720b604e, 0xe2c53110, 0x5b19e372, 0xf21e3f9c, 0x972a0c56,
+   0x6a7b2429, 0xcf83f5aa, 0x2c66ff32, 0x9975fc81, 0xc103d6ec, 0x3bf08f1a, 0x7d56093e, 0x988ef3b6,
+   0x4ea27d5a, 0x47c3beb0, 0xe39d91a2, 0xc8039d27, 0x181077ce, 0x5b478000, 0xc35d3e43, 0x1c3a7fa2,
+   0xa52929c7, 0xc8714283, 0x3d931f8e, 0x93237461, 0x9702c800, 0x9f9d5ae9, 0xf05ddd74, 0x3ff7513b,
+   0xf479fec5, 0xa8c4a91d, 0x016f886b, 0xdec1d779, 0x07b5947b, 0xc07d7f8e, 0x10a71525, 0xcb9d7147,
+   0x406f823d, 0xd56c00e2, 0xdcc29bc7, 0xdaf33734, 0x46b35e22, 0x63b85947, 0x5cfe65c5, 0xb3bc26f3,
+   0x425b892d, 0xdf7c88eb, 0x72736aff, 0x9bdfb058, 0x58e4e792, 0x30260d12, 0x5c740104, 0x4f3a4b81,
+   0x5855175a, 0x0f567200, 0xa2ece4f3, 0xe57b34d6,
+   0x00000000
+};
+
+#else  /* BITS_PER_EMUSHORT != 32 */
+#error ei_service_032_emu32msb.dfn: ERROR: Failed size of EMUSHORT data type.
+#endif /* BITS_PER_EMUSHORT == 32 */
+
+#endif /* __REAL_EINTERNAL_SERVICE_032_32MSB */