mirror of
https://gitlab.com/scemama/QCaml.git
synced 2024-07-25 04:07:24 +02:00
28 lines
657 B
OCaml
28 lines
657 B
OCaml
type shell_contracted = private {
|
|
expo : float array;
|
|
coef : float array;
|
|
center : Coordinate.t;
|
|
totAngMom : Angular_momentum.t;
|
|
size : int;
|
|
norm_coef : float array;
|
|
norm_coef_scale : float array;
|
|
index : int;
|
|
powers : Zkey.t array;
|
|
}
|
|
|
|
type t = shell_contracted
|
|
|
|
|
|
(** Pretty-printing of the contracted shell in a string *)
|
|
val to_string : t -> string
|
|
|
|
(** Creates a contracted shell *)
|
|
val make :
|
|
index:int ->
|
|
expo:float array ->
|
|
coef:float array ->
|
|
center:Coordinate.t -> totAngMom:Angular_momentum.t -> t
|
|
|
|
(** Returns a copy of the contracted shell with a modified index *)
|
|
val with_index : t -> int -> t
|