mirror of
https://gitlab.com/scemama/QCaml.git
synced 2024-07-18 08:53:27 +02:00
25 lines
536 B
OCaml
25 lines
536 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
|
||
|
|
||
|
|
||
|
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
|