2018-03-03 22:29:08 +01:00
|
|
|
(** All constants used in the program.
|
|
|
|
*)
|
|
|
|
|
2018-03-16 00:23:47 +01:00
|
|
|
(** {2 Thresholds } *)
|
2018-03-03 22:29:08 +01:00
|
|
|
|
2018-02-24 23:57:38 +01:00
|
|
|
val epsilon : float
|
2018-03-06 18:25:48 +01:00
|
|
|
(** Value below which a float is considered null. Default is {% $\epsilon$ %} = 10{^-20}. *)
|
2018-02-24 23:57:38 +01:00
|
|
|
|
|
|
|
val integrals_cutoff : float
|
|
|
|
(** Cutoff value for integrals. Default is 10{^-15}. *)
|
|
|
|
|
2018-03-16 00:23:47 +01:00
|
|
|
(** {2 Mathematical constants } *)
|
|
|
|
|
2018-02-13 17:36:25 +01:00
|
|
|
val pi : float
|
2018-03-06 18:25:48 +01:00
|
|
|
(** {% $\pi$ %} = 3.141_592_653_589_793_12 *)
|
2018-02-24 23:57:38 +01:00
|
|
|
|
2019-02-27 14:56:59 +01:00
|
|
|
val two_pi : float
|
|
|
|
(** {% $2\pi$ %} *)
|
|
|
|
|
2018-02-13 17:36:25 +01:00
|
|
|
val sq_pi : float
|
2018-03-06 18:25:48 +01:00
|
|
|
(** {% $\sqrt{\pi}$ %} *)
|
2018-02-24 23:57:38 +01:00
|
|
|
|
2018-02-13 17:36:25 +01:00
|
|
|
val sq_pi_over_two : float
|
2018-03-06 18:25:48 +01:00
|
|
|
(** {% $\frac{\sqrt{\pi}}{2}$ %} *)
|
2018-02-24 23:57:38 +01:00
|
|
|
|
2018-02-13 17:36:25 +01:00
|
|
|
val pi_inv : float
|
2018-03-06 18:25:48 +01:00
|
|
|
(** {% $\frac{1}{\pi}$ %} *)
|
2018-02-24 23:57:38 +01:00
|
|
|
|
2018-02-13 17:36:25 +01:00
|
|
|
val two_over_sq_pi : float
|
2018-03-06 18:25:48 +01:00
|
|
|
(** {% $\frac{2}{\sqrt{\pi}}$ %} *)
|
2018-02-24 23:57:38 +01:00
|
|
|
|
2018-03-16 00:23:47 +01:00
|
|
|
(** {2 Physical constants} *)
|
|
|
|
|
2018-02-13 17:36:25 +01:00
|
|
|
val a0 : float
|
2018-05-30 20:16:18 +02:00
|
|
|
(** Bohr radius : {% $a_0$ %} = 0.529 177 210 67(23) Angstrom *)
|
2018-02-24 23:57:38 +01:00
|
|
|
|
2018-02-13 17:36:25 +01:00
|
|
|
val a0_inv : float
|
2018-03-06 18:25:48 +01:00
|
|
|
(** {% $\frac{1}{a_0}$ %} *)
|
2018-03-16 00:23:47 +01:00
|
|
|
|
2018-05-30 20:16:18 +02:00
|
|
|
val ha_to_ev : float
|
|
|
|
(** Hartree to eV conversion factor :: 27.211 386 02(17) *)
|
|
|
|
|
|
|
|
val ev_to_ha : float
|
|
|
|
(** eV to Hartree conversion factor : 1/{ha_to_ev} *)
|
|
|
|
|