src/tool/Includes_Generaux/consta.h

   1 c
   2 c  la liste qui suit concerne les constantes numeriques classiques.
   3 c
   4       double precision pi
   5       parameter ( pi = 3.14159265358979d0 )
   6 c
   7       double precision uns4pi, deuxpi
   8       parameter ( uns4pi = 1.d0/(4.d0*pi) , deuxpi = 2.d0*pi )
   9 c
  10 c      double precision mu0
  11 c      parameter ( mu0 = 4.d-7*pi )
  12 c
  13 c      double precision c0
  14 c      parameter ( c0 = 2.9979d8 )
  15 c
  16 c      double precision epsil0
  17 c      parameter ( epsil0 = 1.d0/(mu0*c0*c0) )