10
1
mirror of https://gitlab.com/scemama/QCaml.git synced 2024-11-14 10:03:39 +01:00
QCaml/Basis/PrimitiveShell.mli

64 lines
1.9 KiB
OCaml
Raw Normal View History

(** Set of Gaussians differing only by the powers of x, y and z, with a
constant {!AngularMomentum.t}.
2018-03-14 16:22:08 +01:00
{% \\[
g_{n_x,n_y,n_z}(\mathbf{r}) = (x-X_A)^{n_x} (y-Y_A)^{n_y} (z-Z_A)^{n_z}
\exp \left( -\alpha |\mathbf{r}-\mathbf{A}|^2 \right)
2018-03-14 16:22:08 +01:00
\\] %}
where:
- {% $\mathbf{r} = (x,y,z)$ %} is the electron coordinate
- {% $\mathbf{A} = (X_A,Y_A,Z_A)$ %} is the coordinate of center A
2018-03-14 16:22:08 +01:00
- {% $n_x + n_y + n_z = l$ %}, the total angular momentum
- {% $\alpha$ %} is the exponent
*)
type t
val to_string : t -> string
(** Pretty-printing of the primitive shell in a string. *)
val make : AngularMomentum.t -> Coordinate.t -> float -> t
(** Creates a primitive shell from the total angular momentum, the coordinates of the
center and the exponent. *)
val expo : t -> float
(** Exponent {% $\alpha$ %}. *)
2018-03-14 16:22:08 +01:00
val center : t -> Coordinate.t
(** Coordinate {% $\mathbf{A}$ %}.of the center. *)
2018-03-14 16:22:08 +01:00
val totAngMom : t -> AngularMomentum.t
(** Total angular momentum : {% $l = n_x + n_y + n_z$ %}. *)
val norm : t -> float
(** Norm of the shell, defined as
{% \\[ || g_{l,0,0}(\mathbf{r}) || =
\sqrt{ \iiint \left[ (x-X_A)^{l}
\exp (-\alpha |\mathbf{r}-\mathbf{A}|^2) \right]^2 \, dx\, dy\, dz}
\\] %}
*)
2018-03-14 16:22:08 +01:00
val norm_coef : t -> float
(** Normalization coefficient by which the shell has to be multiplied
to be normalized :
{% \\[ \mathcal{N} = \frac{1}{|| g_{l,0,0}(\mathbf{r}) ||} \\] %}.
2018-03-14 16:22:08 +01:00
*)
val norm_coef_scale : t -> float array
(** Scaling factors {% $f(n_x,n_y,n_z)$ %} adjusting the normalization coefficient
for the powers of {% $x,y,z$ %}. The normalization coefficients of the
functions of the shell are given by {% $\mathcal{N}\times f$ %}. They are
given in the same order as [AngularMomentum.zkey_array totAngMom]:
{% \\[ f(n_x,n_y,n_z) = \frac{|| g_{l,0,0}(\mathbf{r}) ||}{|| g_{n_x,n_y,n_z}(\mathbf{r}) ||} \\] %}
2018-03-14 16:22:08 +01:00
*)
val size_of_shell : t -> int
(** Number of functions in the shell. *)