| [220] | 1 | /* quelques fonctions mathematiques et constantes utiles */ | 
|---|
|  | 2 | /*                                         cmv  23/06/94 */ | 
|---|
|  | 3 | #ifndef NBCONST_H_SEEN | 
|---|
|  | 4 | #define NBCONST_H_SEEN | 
|---|
|  | 5 |  | 
|---|
|  | 6 |  | 
|---|
|  | 7 | #ifdef __cplusplus | 
|---|
|  | 8 | extern "C" { | 
|---|
|  | 9 | #endif | 
|---|
|  | 10 |  | 
|---|
| [1140] | 11 | /* EA conflit entre les diverses copies de nbmath.h, nbconst.h... A nettoyer... */ | 
|---|
| [220] | 12 | #undef Pi | 
|---|
|  | 13 | #undef Pis2 | 
|---|
|  | 14 | #undef DeuxPi | 
|---|
|  | 15 | #undef SPi | 
|---|
|  | 16 | #undef S2Pi | 
|---|
|  | 17 | #undef Rac2 | 
|---|
|  | 18 | #undef Log2 | 
|---|
|  | 19 | #undef LnPi | 
|---|
|  | 20 | #undef LgPi | 
|---|
|  | 21 | #undef Ln10 | 
|---|
|  | 22 | #undef DftoDm | 
|---|
|  | 23 | #undef Hln2pi | 
|---|
|  | 24 | #undef DegenRad | 
|---|
|  | 25 | #undef JourSec | 
|---|
|  | 26 | #undef AnSec | 
|---|
|  | 27 |  | 
|---|
|  | 28 | #undef UAenKM | 
|---|
|  | 29 | #undef UAenLY | 
|---|
|  | 30 | #undef KPCenKM | 
|---|
|  | 31 | #undef KPCenUA | 
|---|
|  | 32 | #undef KPenLY | 
|---|
|  | 33 | #undef LYenKM | 
|---|
|  | 34 | #undef RSolenKM | 
|---|
|  | 35 | #undef RTenKM | 
|---|
|  | 36 | #undef MSolenKg | 
|---|
|  | 37 | #undef GC_RE | 
|---|
|  | 38 |  | 
|---|
|  | 39 | #undef GRAND | 
|---|
|  | 40 | #undef GRAND2 | 
|---|
|  | 41 | #undef IGRAND | 
|---|
|  | 42 |  | 
|---|
| [1259] | 43 | #define Pi     (double) (3.1415926535897931)   /*!< Pi */ | 
|---|
|  | 44 | #define Pis2   (double) (1.57079632679489655)  /*!< Pi/2 */ | 
|---|
|  | 45 | #define DeuxPi (double) (6.2831853071795862)   /*!< 2*Pi */ | 
|---|
|  | 46 | #define SPi    (double) (1.7724538509055159)   /*!< sqrt(Pi) */ | 
|---|
|  | 47 | #define S2Pi   (double) (2.5066282746310002)   /*!< sqrt(2*Pi) */ | 
|---|
|  | 48 | #define Rac2   (double) (1.4142135623730950)   /*!< sqrt(2) */ | 
|---|
|  | 49 | #define Log2   (double) (0.30102999566398119)  /*!< log10(2) */ | 
|---|
|  | 50 | #define LnPi   (double) (1.1447298858494002)   /*!< ln(Pi) */ | 
|---|
|  | 51 | #define LgPi   (double) (0.49714987269413385)  /*!< log10(Pi) */ | 
|---|
|  | 52 | #define Ln10   (double) (2.3025850929940456)   /*!< ln(10) */ | 
|---|
|  | 53 | #define DftoDm (double) (1.0857362047581295)   /*!< 2.5/ln(10) */ | 
|---|
|  | 54 | #define Hln2pi (double) (0.91893853320467267)  /*!< Ln(2*pi)/2 */ | 
|---|
|  | 55 | #define DegenRad (double) (0.0174532925199)    /*!< nombre de radians dans un degre */ | 
|---|
|  | 56 | #define AMnenRad (double) (0.000290888208665)    /*!< nombre de radians dans une arc minute */ | 
|---|
| [220] | 57 |  | 
|---|
| [1259] | 58 | #define JourSec (float) (86400.)    /*!< nombre de secondes dans 24H */ | 
|---|
|  | 59 | #define AnSec  (int) (31557600)     /*!< nombre de secondes dans 365.25 jours */ | 
|---|
| [220] | 60 |  | 
|---|
| [1259] | 61 | #define UAenKM (double) (149597870.) /*!< nombre de kilometres dans une unite astronomique */ | 
|---|
|  | 62 | #define UAenLY (double) (1.5812507406e-5) /*!< unite astronomique en annees lumiere */ | 
|---|
|  | 63 | #define KPCenKM (double) (3.0856775807e+16) /*!< nombre de kilometres dans un kiloparsec */ | 
|---|
|  | 64 | #define KPCenUA (double) (206264806.248) /*!< nombre d'unites astronomiques dans un kiloparsec */ | 
|---|
|  | 65 | #define KPenLY (double) (3261.5637763) /*!< kiloparsec en annees lumiere */ | 
|---|
|  | 66 | #define LYenKM (double) (9.4607304725808*e+12) /*!< annee lumiere en kilometres */ | 
|---|
|  | 67 | #define RSolenKM (double) (6.9599e+5) /*!< Rayon solaire en kilometres */ | 
|---|
|  | 68 | #define RTenKM (double) (6378.14) /*!< rayon equatorial terrestre en kilometres */ | 
|---|
| [220] | 69 |  | 
|---|
| [1259] | 70 | #define MSolenKg (double) (1.9891e+30) /*!< masse solaire en kilogramme */ | 
|---|
| [220] | 71 |  | 
|---|
| [1259] | 72 | #define GC_RE ((double) 4.7854172e-17) /*!< G/c**2 en unites kpc/Mo */ | 
|---|
| [220] | 73 |  | 
|---|
|  | 74 | #define GRAND  (float) (1.e+35) | 
|---|
|  | 75 | #define GRAND2 (double) (1.e+35) | 
|---|
|  | 76 | #define IGRAND (int_4) (2147483647) | 
|---|
|  | 77 |  | 
|---|
|  | 78 | #ifdef __cplusplus | 
|---|
|  | 79 | } | 
|---|
|  | 80 | #endif | 
|---|
|  | 81 |  | 
|---|
|  | 82 | #endif | 
|---|