source: Sophya/trunk/Poubelle/DPC:FitsIOServer/NTools/pemath.h@ 1219

Last change on this file since 1219 was 658, checked in by ansari, 26 years ago

no message
File size: 1.2 KB
Line 
1/* quelques fonctions mathematiques et constantes utiles */
2/* cmv 23/06/94 */
3
4#ifndef PEMATH_SEEN
5#define PEMATH_SEEN
6
7#include "machdefs.h"
8
9#define Pi (double) (3.1415926535898) /* c'est Pi */
10#define DeuxPi (double) (6.2831853071796) /* c'est 2*Pi */
11#define SPi (double) (1.772453850906) /* c'est sqrt(Pi) */
12#define S2Pi (double) (2.506628274631) /* c'est sqrt(2*Pi) */
13#define Rac2 (double) (1.414213562373) /* c'est sqrt(2) */
14#define Log2 (double) (0.301029995664) /* c'est log10(2) */
15#define LnPi (double) (1.14472988585) /* c'est ln(Pi) */
16#define LgPi (double) (0.497149872694) /* c'est log10(Pi) */
17#define Ln10 (double) (2.302585092994) /* c'est ln(10) */
18#define DftoDm (double) (1.085736204758) /* c'est 2.5/ln(10) */
19#define Hln2pi (double) 0.918938533205 /* c'est Ln(2*pi)/2 */
20#define JourSec (float) (86400.) /* nombre de secondes dans 24H */
21#define AnSec (int) (31557600) /* nombre de secondes dans 365.25 jours */
22#define GRAND (float) (1.e+35)
23#define GRAND2 (double) (1.e+35)
24#define IGRAND (int_4) (2147483647)
25
26#endif
Note: See TracBrowser for help on using the repository browser.