gamma_vec.c

标准c库代码,可以应用于各个系统提供了大量的基本函数

{64, 0,123,__LINE__, 0x3ff604e4, 0x7b353980, 0x3fcd70a3, 0xd70a3d96},			/* 1.37619=f(0.23000)*/
{64, 0,123,__LINE__, 0x3ff54c82, 0x8064dd37, 0x3fceb851, 0xeb851ede},			/* 1.33117=f(0.24000)*/
{64, 0,123,__LINE__, 0x3ff49bbd, 0x81c16ee7, 0x3fd00000, 0x00000013},			/* 1.28802=f(0.25000)*/
{62, 0,123,__LINE__, 0x3ff3f205, 0x20fe465a, 0x3fd0a3d7, 0x0a3d70b7},			/* 1.24658=f(0.26000)*/
{64, 0,123,__LINE__, 0x3ff34ed9, 0x388c2969, 0x3fd147ae, 0x147ae15b},			/* 1.20675=f(0.27000)*/
{64, 0,123,__LINE__, 0x3ff2b1c7, 0x8012028d, 0x3fd1eb85, 0x1eb851ff},			/* 1.16840=f(0.28000)*/
{64, 0,123,__LINE__, 0x3ff21a69, 0x9ad205bd, 0x3fd28f5c, 0x28f5c2a3},			/* 1.13144=f(0.29000)*/
{64, 0,123,__LINE__, 0x3ff18863, 0x7a6c4184, 0x3fd33333, 0x33333347},			/* 1.09579=f(0.30000)*/
{62, 0,123,__LINE__, 0x3ff0fb62, 0x0563466a, 0x3fd3d70a, 0x3d70a3eb},			/* 1.06137=f(0.31000)*/
{64, 0,123,__LINE__, 0x3ff07319, 0xf4790096, 0x3fd47ae1, 0x47ae148f},			/* 1.02810=f(0.32000)*/
{62, 0,123,__LINE__, 0x3fefde8d, 0xb984cef2, 0x3fd51eb8, 0x51eb8533},			/* 0.99591=f(0.33000)*/
{63, 0,123,__LINE__, 0x3feedf54, 0xbcddcb8d, 0x3fd5c28f, 0x5c28f5d7},			/* 0.96476=f(0.34000)*/
{62, 0,123,__LINE__, 0x3fede816, 0xe3c18e26, 0x3fd66666, 0x6666667b},			/* 0.93458=f(0.35000)*/
{62, 0,123,__LINE__, 0x3fecf86b, 0x9becf7aa, 0x3fd70a3d, 0x70a3d71f},			/* 0.90532=f(0.36000)*/
{62, 0,123,__LINE__, 0x3fec0ff2, 0xc6c099aa, 0x3fd7ae14, 0x7ae147c3},			/* 0.87694=f(0.37000)*/
{64, 0,123,__LINE__, 0x3feb2e53, 0xd34840ad, 0x3fd851eb, 0x851eb867},			/* 0.84940=f(0.38000)*/
{63, 0,123,__LINE__, 0x3fea533c, 0xf61ba0b9, 0x3fd8f5c2, 0x8f5c290b},			/* 0.82266=f(0.39000)*/
{64, 0,123,__LINE__, 0x3fe97e62, 0x7a8f4a1f, 0x3fd99999, 0x999999af},			/* 0.79667=f(0.40000)*/
{64, 0,123,__LINE__, 0x3fe8af7e, 0x2975c40d, 0x3fda3d70, 0xa3d70a53},			/* 0.77142=f(0.41000)*/
{63, 0,123,__LINE__, 0x3fe7e64e, 0xc252abd7, 0x3fdae147, 0xae147af7},			/* 0.74686=f(0.42000)*/
{64, 0,123,__LINE__, 0x3fe72297, 0x8465376d, 0x3fdb851e, 0xb851eb9b},			/* 0.72297=f(0.43000)*/
{63, 0,123,__LINE__, 0x3fe6641f, 0xc55ac741, 0x3fdc28f5, 0xc28f5c3f},			/* 0.69972=f(0.44000)*/
{64, 0,123,__LINE__, 0x3fe5aab2, 0x93d23542, 0x3fdccccc, 0xcccccce3},			/* 0.67708=f(0.45000)*/
{61, 0,123,__LINE__, 0x3fe4f61e, 0x642115c4, 0x3fdd70a3, 0xd70a3d87},			/* 0.65504=f(0.46000)*/
{64, 0,123,__LINE__, 0x3fe44634, 0xc6082a3c, 0x3fde147a, 0xe147ae2b},			/* 0.63357=f(0.47000)*/
{64, 0,123,__LINE__, 0x3fe39aca, 0x223633e0, 0x3fdeb851, 0xeb851ecf},			/* 0.61264=f(0.48000)*/
{64, 0,123,__LINE__, 0x3fe2f3b5, 0x7ea204c6, 0x3fdf5c28, 0xf5c28f73},			/* 0.59224=f(0.49000)*/
{64, 0,123,__LINE__, 0x3fe250d0, 0x48e7a1a7, 0x3fe00000, 0x0000000b},			/* 0.57236=f(0.50000)*/
{63, 0,123,__LINE__, 0x3fe1b1f6, 0x25f1b011, 0x3fe051eb, 0x851eb85d},			/* 0.55297=f(0.51000)*/
{64, 0,123,__LINE__, 0x3fe11704, 0xc651449e, 0x3fe0a3d7, 0x0a3d70af},			/* 0.53405=f(0.52000)*/
{60, 0,123,__LINE__, 0x3fe07fdb, 0xbebb3308, 0x3fe0f5c2, 0x8f5c2901},			/* 0.51560=f(0.53000)*/
{63, 0,123,__LINE__, 0x3fdfd8b8, 0xc867d4a0, 0x3fe147ae, 0x147ae153},			/* 0.49760=f(0.54000)*/
{64, 0,123,__LINE__, 0x3fdeb8d3, 0x57045cb6, 0x3fe19999, 0x999999a5},			/* 0.48003=f(0.55000)*/
{63, 0,123,__LINE__, 0x3fdd9fd0, 0x171c2731, 0x3fe1eb85, 0x1eb851f7},			/* 0.46287=f(0.56000)*/
{64, 0,123,__LINE__, 0x3fdc8d7a, 0xc4b9b5a6, 0x3fe23d70, 0xa3d70a49},			/* 0.44613=f(0.57000)*/
{64, 0,123,__LINE__, 0x3fdb81a1, 0xb8c7e918, 0x3fe28f5c, 0x28f5c29b},			/* 0.42978=f(0.58000)*/
{63, 0,123,__LINE__, 0x3fda7c15, 0xbbeb953c, 0x3fe2e147, 0xae147aed},			/* 0.41382=f(0.59000)*/
{63, 0,123,__LINE__, 0x3fd97ca9, 0xdd244e01, 0x3fe33333, 0x3333333f},			/* 0.39823=f(0.60000)*/
{63, 0,123,__LINE__, 0x3fd88333, 0x4bd4a433, 0x3fe3851e, 0xb851eb91},			/* 0.38300=f(0.61000)*/
{64, 0,123,__LINE__, 0x3fd78f89, 0x34dcecc4, 0x3fe3d70a, 0x3d70a3e3},			/* 0.36813=f(0.62000)*/
{64, 0,123,__LINE__, 0x3fd6a184, 0xa27d2eb7, 0x3fe428f5, 0xc28f5c35},			/* 0.35360=f(0.63000)*/
{64, 0,123,__LINE__, 0x3fd5b900, 0x5ebb22ca, 0x3fe47ae1, 0x47ae1487},			/* 0.33941=f(0.64000)*/
{64, 0,123,__LINE__, 0x3fd4d5d8, 0xd8107650, 0x3fe4cccc, 0xccccccd9},			/* 0.32555=f(0.65000)*/
{64, 0,123,__LINE__, 0x3fd3f7ec, 0x082be648, 0x3fe51eb8, 0x51eb852b},			/* 0.31200=f(0.66000)*/
{64, 0,123,__LINE__, 0x3fd31f19, 0x5c956618, 0x3fe570a3, 0xd70a3d7d},			/* 0.29877=f(0.67000)*/
{60, 0,123,__LINE__, 0x3fd24b41, 0xa10a79a8, 0x3fe5c28f, 0x5c28f5cf},			/* 0.28584=f(0.68000)*/
{62, 0,123,__LINE__, 0x3fd17c46, 0xeb6c4a77, 0x3fe6147a, 0xe147ae21},			/* 0.27321=f(0.69000)*/
{63, 0,123,__LINE__, 0x3fd0b20c, 0x891cde53, 0x3fe66666, 0x66666673},			/* 0.26086=f(0.70000)*/
{60, 0,123,__LINE__, 0x3fcfd8ed, 0xdb588ae9, 0x3fe6b851, 0xeb851ec5},			/* 0.24880=f(0.71000)*/
{61, 0,123,__LINE__, 0x3fce56d7, 0x4573432e, 0x3fe70a3d, 0x70a3d717},			/* 0.23702=f(0.72000)*/
{63, 0,123,__LINE__, 0x3fccdda2, 0x71dd3cb6, 0x3fe75c28, 0xf5c28f69},			/* 0.22551=f(0.73000)*/
{63, 0,123,__LINE__, 0x3fcb6d1e, 0x73fcbbc5, 0x3fe7ae14, 0x7ae147bb},			/* 0.21426=f(0.74000)*/
{63, 0,123,__LINE__, 0x3fca051c, 0x372609b5, 0x3fe80000, 0x0000000d},			/* 0.20328=f(0.75000)*/
{64, 0,123,__LINE__, 0x3fc8a56e, 0x662dfe50, 0x3fe851eb, 0x851eb85f},			/* 0.19254=f(0.76000)*/
{64, 0,123,__LINE__, 0x3fc74de9, 0x5491a0f3, 0x3fe8a3d7, 0x0a3d70b1},			/* 0.18206=f(0.77000)*/
{64, 0,123,__LINE__, 0x3fc5fe62, 0xe913a148, 0x3fe8f5c2, 0x8f5c2903},			/* 0.17182=f(0.78000)*/
{64, 0,123,__LINE__, 0x3fc4b6b2, 0x89b32fee, 0x3fe947ae, 0x147ae155},			/* 0.16182=f(0.79000)*/
{64, 0,123,__LINE__, 0x3fc376b1, 0x08e23fdc, 0x3fe99999, 0x999999a7},			/* 0.15205=f(0.80000)*/
{64, 0,123,__LINE__, 0x3fc23e38, 0x93e37a8d, 0x3fe9eb85, 0x1eb851f9},			/* 0.14252=f(0.81000)*/
{64, 0,123,__LINE__, 0x3fc10d24, 0xa23a398b, 0x3fea3d70, 0xa3d70a4b},			/* 0.13321=f(0.82000)*/
{59, 0,123,__LINE__, 0x3fbfc6a3, 0xcc315b8f, 0x3fea8f5c, 0x28f5c29d},			/* 0.12412=f(0.83000)*/
{64, 0,123,__LINE__, 0x3fbd813c, 0x7b740ced, 0x3feae147, 0xae147aef},			/* 0.11525=f(0.84000)*/
{63, 0,123,__LINE__, 0x3fbb49d1, 0x4b2fd374, 0x3feb3333, 0x33333341},			/* 0.10659=f(0.85000)*/
{64, 0,123,__LINE__, 0x3fb92022, 0x56d7dd05, 0x3feb851e, 0xb851eb93},			/* 0.09814=f(0.86000)*/
{60, 0,123,__LINE__, 0x3fb703f1, 0xc3de06d7, 0x3febd70a, 0x3d70a3e5},			/* 0.08990=f(0.87000)*/
{62, 0,123,__LINE__, 0x3fb4f503, 0xaa939c81, 0x3fec28f5, 0xc28f5c37},			/* 0.08186=f(0.88000)*/
{62, 0,123,__LINE__, 0x3fb2f31e, 0x00542ac1, 0x3fec7ae1, 0x47ae1489},			/* 0.07402=f(0.89000)*/
{64, 0,123,__LINE__, 0x3fb0fe08, 0x82e4655d, 0x3feccccc, 0xccccccdb},			/* 0.06637=f(0.90000)*/
{61, 0,123,__LINE__, 0x3fae2b19, 0x49e1a3e3, 0x3fed1eb8, 0x51eb852d},			/* 0.05892=f(0.91000)*/
{64, 0,123,__LINE__, 0x3faa72ea, 0xf732ec52, 0x3fed70a3, 0xd70a3d7f},			/* 0.05165=f(0.92000)*/
{62, 0,123,__LINE__, 0x3fa6d31f, 0x59f26461, 0x3fedc28f, 0x5c28f5d1},			/* 0.04457=f(0.93000)*/
{64, 0,123,__LINE__, 0x3fa34b52, 0xbf31777a, 0x3fee147a, 0xe147ae23},			/* 0.03768=f(0.94000)*/
{64, 0,123,__LINE__, 0x3f9fb648, 0xaaf974c7, 0x3fee6666, 0x66666675},			/* 0.03096=f(0.95000)*/
{61, 0,123,__LINE__, 0x3f99046c, 0x1e32ca6b, 0x3feeb851, 0xeb851ec7},			/* 0.02443=f(0.96000)*/
{62, 0,123,__LINE__, 0x3f928059, 0x0b8e7465, 0x3fef0a3d, 0x70a3d719},			/* 0.01806=f(0.97000)*/
{62, 0,123,__LINE__, 0x3f8852bb, 0x7fbc7bc9, 0x3fef5c28, 0xf5c28f6b},			/* 0.01187=f(0.98000)*/
{60, 0,123,__LINE__, 0x3f77fb35, 0xb942dcc7, 0x3fefae14, 0x7ae147bd},			/* 0.00585=f(0.99000)*/
{61, 0,123,__LINE__, 0xbcd0297b, 0x5ce1bf4b, 0x3ff00000, 0x00000007},			/* -8.97173e-16=f(1.00000)*/
{61, 0,123,__LINE__, 0xbf774eb8, 0x68854a93, 0x3ff028f5, 0xc28f5c30},			/* -0.00569=f(1.01000)*/
{60, 0,123,__LINE__, 0xbf86f9b8, 0x26415027, 0x3ff051eb, 0x851eb859},			/* -0.01121=f(1.02000)*/
{63, 0,123,__LINE__, 0xbf90fc24, 0xebca70f4, 0x3ff07ae1, 0x47ae1482},			/* -0.01658=f(1.03000)*/
{63, 0,123,__LINE__, 0xbf96521f, 0x9a6e8e80, 0x3ff0a3d7, 0x0a3d70ab},			/* -0.02179=f(1.04000)*/
{62, 0,123,__LINE__, 0xbf9b7f5f, 0x30c6fdd9, 0x3ff0cccc, 0xccccccd4},			/* -0.02685=f(1.05000)*/
{63, 0,123,__LINE__, 0xbfa04239, 0x800dd664, 0x3ff0f5c2, 0x8f5c28fd},			/* -0.03175=f(1.06000)*/
{63, 0,123,__LINE__, 0xbfa2b0f3, 0x5dde5138, 0x3ff11eb8, 0x51eb8526},			/* -0.03650=f(1.07000)*/
{62, 0,123,__LINE__, 0xbfa50c21, 0x4cf501ed, 0x3ff147ae, 0x147ae14f},			/* -0.04110=f(1.08000)*/
{61, 0,123,__LINE__, 0xbfa75405, 0xb99ffcc3, 0x3ff170a3, 0xd70a3d78},			/* -0.04556=f(1.09000)*/
{62, 0,123,__LINE__, 0xbfa988e1, 0x705d8a48, 0x3ff19999, 0x999999a1},			/* -0.04987=f(1.10000)*/
{61, 0,123,__LINE__, 0xbfabaaf3, 0xac344283, 0x3ff1c28f, 0x5c28f5ca},			/* -0.05403=f(1.11000)*/
{62, 0,123,__LINE__, 0xbfadba7a, 0x246a1f3d, 0x3ff1eb85, 0x1eb851f3},			/* -0.05806=f(1.12000)*/
{62, 0,123,__LINE__, 0xbfafb7b1, 0x19a30459, 0x3ff2147a, 0xe147ae1c},			/* -0.06194=f(1.13000)*/
{63, 0,123,__LINE__, 0xbfb0d169, 0xb1375bd8, 0x3ff23d70, 0xa3d70a45},			/* -0.06569=f(1.14000)*/
{62, 0,123,__LINE__, 0xbfb1be0d, 0x3ba6e2f4, 0x3ff26666, 0x6666666e},			/* -0.06930=f(1.15000)*/
{61, 0,123,__LINE__, 0xbfb2a1df, 0x3f1a2f12, 0x3ff28f5c, 0x28f5c297},			/* -0.07278=f(1.16000)*/
{63, 0,123,__LINE__, 0xbfb37cfb, 0x2ac8e162, 0x3ff2b851, 0xeb851ec0},			/* -0.07612=f(1.17000)*/
{59, 0,123,__LINE__, 0xbfb44f7b, 0xcf71448f, 0x3ff2e147, 0xae147ae9},			/* -0.07933=f(1.18000)*/
{63, 0,123,__LINE__, 0xbfb5197b, 0x6469c248, 0x3ff30a3d, 0x70a3d712},			/* -0.08242=f(1.19000)*/
{62, 0,123,__LINE__, 0x40151c74, 0xa1cd4989, 0xc01921fb, 0x54442d18},			/* 5.27778=f(-6.28318)*/
{59, 0,123,__LINE__, 0x400608aa, 0x8a8d8d2f, 0xc012d97c, 0x7f3321d2},			/* 2.75423=f(-4.71238)*/
{62, 0,123,__LINE__, 0x3fea7c79, 0x5ea35deb, 0xc00921fb, 0x54442d18},			/* 0.82769=f(-3.14159)*/
{63, 0,123,__LINE__, 0xbfbdabdf, 0x1a1d104e, 0xbff921fb, 0x54442d18},			/* -0.11590=f(-1.57079)*/
{64,15, 39,__LINE__, 0x40500000, 0x00000000, 0x00000000, 0x00000000},			/* 64.0000=f(0.00000)*/
{63, 0,123,__LINE__, 0xbfbdabdf, 0x1a1d104e, 0x3ff921fb, 0x54442d18},			/* -0.11590=f(1.57079)*/
{62, 0,123,__LINE__, 0x3fea7c79, 0x5ea35deb, 0x400921fb, 0x54442d18},			/* 0.82769=f(3.14159)*/
{59, 0,123,__LINE__, 0x400608aa, 0x8a8d8d2f, 0x4012d97c, 0x7f3321d2},			/* 2.75423=f(4.71238)*/
{64, 0,123,__LINE__, 0x4051d073, 0x53917230, 0xc03e0000, 0x00000000},			/* 71.2570=f(-30.0000)*/
{64, 0,123,__LINE__, 0x4050636b, 0x94b9c88a, 0xc03c4ccc, 0xcccccccd},			/* 65.5534=f(-28.3000)*/
{64, 0,123,__LINE__, 0x404dfa17, 0xe2dfce14, 0xc03a9999, 0x9999999a},			/* 59.9538=f(-26.6000)*/
{64, 0,123,__LINE__, 0x404b3b87, 0x11a8e7ce, 0xc038e666, 0x66666667},			/* 54.4650=f(-24.9000)*/
{64, 0,123,__LINE__, 0x40488c21, 0xfae8b0bc, 0xc0373333, 0x33333334},			/* 49.0947=f(-23.2000)*/
{64, 0,123,__LINE__, 0x4045ed0b, 0xe8171bb8, 0xc0358000, 0x00000001},			/* 43.8519=f(-21.5000)*/
{64, 0,123,__LINE__, 0x40435f97, 0x6a4f5f75, 0xc033cccc, 0xccccccce},			/* 38.7468=f(-19.8000)*/
{64, 0,123,__LINE__, 0x4040e552, 0xe4ea7aea, 0xc0321999, 0x9999999b},			/* 33.7915=f(-18.1000)*/
{64, 0,123,__LINE__, 0x403d0033, 0xeebf8308, 0xc0306666, 0x66666668},			/* 29.0007=f(-16.4000)*/
{64, 0,123,__LINE__, 0x4038645c, 0xcca2e5ab, 0xc02d6666, 0x6666666a},			/* 24.3920=f(-14.7000)*/
{64, 0,123,__LINE__, 0x4033fcba, 0x16d50148, 0xc02a0000, 0x00000004},			/* 19.9872=f(-13.0000)*/
{64, 0,123,__LINE__, 0x402fa0dc, 0x4a4f1284, 0xc0269999, 0x9999999e},			/* 15.8141=f(-11.3000)*/
{64, 0,123,__LINE__, 0x4027d1be, 0xf9cf2f7e, 0xc0233333, 0x33333338},			/* 11.9096=f(-9.60000)*/
{64, 0,123,__LINE__, 0x4020a606, 0x2d049d2a, 0xc01f9999, 0x999999a3},			/* 8.32426=f(-7.90000)*/
{62, 0,123,__LINE__, 0x40148779, 0x555c3f28, 0xc018cccc, 0xccccccd6},			/* 5.13229=f(-6.20000)*/
{64, 0,123,__LINE__, 0x4003a140, 0xa3a623e4, 0xc0120000, 0x00000009},			/* 2.45373=f(-4.50000)*/
{62, 0,123,__LINE__, 0x3fe088d4, 0x4b2adb7a, 0xc0066666, 0x66666678},			/* 0.51670=f(-2.80000)*/
{62, 0,123,__LINE__, 0xbfa988e1, 0x705d8bc4, 0xbff19999, 0x999999bd},			/* -0.04987=f(-1.10000)*/
{64, 0,123,__LINE__, 0x3fd97ca9, 0xdd244f00, 0x3fe33333, 0x333332ec},			/* 0.39823=f(0.60000)*/
{59, 0,123,__LINE__, 0x3fc3bc7a, 0xe53846b0, 0x40026666, 0x66666654},			/* 0.15418=f(2.30000)*/
{62, 0,123,__LINE__, 0x3ffcab0b, 0xfa2a1fd6, 0x400fffff, 0xffffffee},			/* 1.79175=f(4.00000)*/
{64, 0,123,__LINE__, 0x401122c8, 0x6abdedf8, 0x4016cccc, 0xccccccc4},			/* 4.28396=f(5.70000)*/
{63, 0,123,__LINE__, 0x401d5c93, 0x1f42284e, 0x401d9999, 0x99999991},			/* 7.34040=f(7.40000)*/
{64, 0,123,__LINE__, 0x4025a375, 0x0a6f0ada, 0x40223333, 0x3333332f},			/* 10.8192=f(9.10000)*/
{64, 0,123,__LINE__, 0x402d459e, 0xd9f0398a, 0x40259999, 0x99999995},			/* 14.6359=f(10.8000)*/
{64, 0,123,__LINE__, 0x4032bbfe, 0x32d3aa79, 0x4028ffff, 0xfffffffb},			/* 18.7343=f(12.5000)*/
{64, 0,123,__LINE__, 0x40371300, 0x26276f8a, 0x402c6666, 0x66666661},			/* 23.0742=f(14.2000)*/
{64, 0,123,__LINE__, 0x403ba020, 0x52c704f0, 0x402fcccc, 0xccccccc7},			/* 27.6254=f(15.9000)*/
{64, 0,123,__LINE__, 0x40402eaf, 0xef4149f4, 0x40319999, 0x99999997},			/* 32.3647=f(17.6000)*/
{64, 0,123,__LINE__, 0x4042a2f9, 0x41f4bf5a, 0x40334ccc, 0xccccccca},			/* 37.2732=f(19.3000)*/
{64, 0,123,__LINE__, 0x40452af5, 0x7aed77ba, 0x4034ffff, 0xfffffffd},			/* 42.3356=f(21.0000)*/
{64, 0,123,__LINE__, 0x4047c501, 0x9442501c, 0x4036b333, 0x33333330},			/* 47.5391=f(22.7000)*/
{64, 0,123,__LINE__, 0x404a6fba, 0xe04511ae, 0x40386666, 0x66666663},			/* 52.8728=f(24.4000)*/
{64, 0,123,__LINE__, 0x404d29f1, 0x436831ba, 0x403a1999, 0x99999996},			/* 58.3276=f(26.1000)*/
{64, 0,123,__LINE__, 0x404ff29d, 0x1a191b4b, 0x403bcccc, 0xccccccc9},			/* 63.8954=f(27.8000)*/
{64, 0,123,__LINE__, 0x4051646b, 0xd261edc0, 0x403d7fff, 0xfffffffc},			/* 69.5690=f(29.5000)*/
0,};
test_gamma(m)   {run_vector_1(m,gamma_vec,(char *)(gamma),"gamma","dd");   }