Back to home page

EIC code displayed by LXR

 
 

    


File indexing completed on 2025-01-18 10:00:55

0001 /* Author:  B. Gough and G. Jungman */
0002 #ifndef __GSL_MACHINE_H__
0003 #define __GSL_MACHINE_H__
0004 
0005 #include <limits.h>
0006 #include <float.h>
0007 
0008 /* magic constants; mostly for the benefit of the implementation */
0009 
0010 /* -*-MACHINE CONSTANTS-*-
0011  *
0012  * PLATFORM: Whiz-O-Matic 9000
0013  * FP_PLATFORM: IEEE-Virtual
0014  * HOSTNAME: nnn.lanl.gov
0015  * DATE: Fri Nov 20 17:53:26 MST 1998
0016  */
0017 #define GSL_DBL_EPSILON        2.2204460492503131e-16
0018 #define GSL_SQRT_DBL_EPSILON   1.4901161193847656e-08
0019 #define GSL_ROOT3_DBL_EPSILON  6.0554544523933429e-06
0020 #define GSL_ROOT4_DBL_EPSILON  1.2207031250000000e-04
0021 #define GSL_ROOT5_DBL_EPSILON  7.4009597974140505e-04
0022 #define GSL_ROOT6_DBL_EPSILON  2.4607833005759251e-03
0023 #define GSL_LOG_DBL_EPSILON   (-3.6043653389117154e+01)
0024 
0025 #define GSL_DBL_MIN        2.2250738585072014e-308
0026 #define GSL_SQRT_DBL_MIN   1.4916681462400413e-154
0027 #define GSL_ROOT3_DBL_MIN  2.8126442852362996e-103
0028 #define GSL_ROOT4_DBL_MIN  1.2213386697554620e-77
0029 #define GSL_ROOT5_DBL_MIN  2.9476022969691763e-62
0030 #define GSL_ROOT6_DBL_MIN  5.3034368905798218e-52
0031 #define GSL_LOG_DBL_MIN   (-7.0839641853226408e+02)
0032 
0033 #define GSL_DBL_MAX        1.7976931348623157e+308
0034 #define GSL_SQRT_DBL_MAX   1.3407807929942596e+154
0035 #define GSL_ROOT3_DBL_MAX  5.6438030941222897e+102
0036 #define GSL_ROOT4_DBL_MAX  1.1579208923731620e+77
0037 #define GSL_ROOT5_DBL_MAX  4.4765466227572707e+61
0038 #define GSL_ROOT6_DBL_MAX  2.3756689782295612e+51
0039 #define GSL_LOG_DBL_MAX    7.0978271289338397e+02
0040 
0041 #define GSL_FLT_EPSILON        1.1920928955078125e-07
0042 #define GSL_SQRT_FLT_EPSILON   3.4526698300124393e-04
0043 #define GSL_ROOT3_FLT_EPSILON  4.9215666011518501e-03
0044 #define GSL_ROOT4_FLT_EPSILON  1.8581361171917516e-02
0045 #define GSL_ROOT5_FLT_EPSILON  4.1234622211652937e-02
0046 #define GSL_ROOT6_FLT_EPSILON  7.0153878019335827e-02
0047 #define GSL_LOG_FLT_EPSILON   (-1.5942385152878742e+01)
0048 
0049 #define GSL_FLT_MIN        1.1754943508222875e-38
0050 #define GSL_SQRT_FLT_MIN   1.0842021724855044e-19
0051 #define GSL_ROOT3_FLT_MIN  2.2737367544323241e-13
0052 #define GSL_ROOT4_FLT_MIN  3.2927225399135965e-10
0053 #define GSL_ROOT5_FLT_MIN  2.5944428542140822e-08
0054 #define GSL_ROOT6_FLT_MIN  4.7683715820312542e-07
0055 #define GSL_LOG_FLT_MIN   (-8.7336544750553102e+01)
0056 
0057 #define GSL_FLT_MAX        3.4028234663852886e+38
0058 #define GSL_SQRT_FLT_MAX   1.8446743523953730e+19
0059 #define GSL_ROOT3_FLT_MAX  6.9814635196223242e+12
0060 #define GSL_ROOT4_FLT_MAX  4.2949672319999986e+09
0061 #define GSL_ROOT5_FLT_MAX  5.0859007855960041e+07
0062 #define GSL_ROOT6_FLT_MAX  2.6422459233807749e+06
0063 #define GSL_LOG_FLT_MAX    8.8722839052068352e+01
0064 
0065 #define GSL_SFLT_EPSILON        4.8828125000000000e-04
0066 #define GSL_SQRT_SFLT_EPSILON   2.2097086912079612e-02
0067 #define GSL_ROOT3_SFLT_EPSILON  7.8745065618429588e-02
0068 #define GSL_ROOT4_SFLT_EPSILON  1.4865088937534013e-01
0069 #define GSL_ROOT5_SFLT_EPSILON  2.1763764082403100e-01
0070 #define GSL_ROOT6_SFLT_EPSILON  2.8061551207734325e-01
0071 #define GSL_LOG_SFLT_EPSILON   (-7.6246189861593985e+00)
0072 
0073 /* !MACHINE CONSTANTS! */
0074 
0075 
0076 /* a little internal backwards compatibility */
0077 #define GSL_MACH_EPS  GSL_DBL_EPSILON
0078 
0079 
0080 
0081 /* Here are the constants related to or derived from
0082  * machine constants. These are not to be confused with
0083  * the constants that define various precision levels
0084  * for the precision/error system.
0085  *
0086  * This information is determined at configure time
0087  * and is platform dependent. Edit at your own risk.
0088  *
0089  * PLATFORM: WHIZ-O-MATIC
0090  * CONFIG-DATE: Thu Nov 19 19:27:18 MST 1998
0091  * CONFIG-HOST: nnn.lanl.gov
0092  */
0093 
0094 /* machine precision constants */
0095 /* #define GSL_MACH_EPS         1.0e-15 */
0096 #define GSL_SQRT_MACH_EPS       3.2e-08
0097 #define GSL_ROOT3_MACH_EPS      1.0e-05
0098 #define GSL_ROOT4_MACH_EPS      0.000178
0099 #define GSL_ROOT5_MACH_EPS      0.00100
0100 #define GSL_ROOT6_MACH_EPS      0.00316
0101 #define GSL_LOG_MACH_EPS       (-34.54)
0102 
0103 
0104 #endif /* __GSL_MACHINE_H__ */