10
1
mirror of https://gitlab.com/scemama/QCaml.git synced 2024-07-17 00:20:23 +02:00
QCaml/ao/lib/basis_gaussian.mli

60 lines
1.4 KiB
OCaml
Raw Normal View History

2021-01-04 23:15:27 +01:00
(* Type
*
2021-01-20 23:55:34 +01:00
* <<<~Gaussian_basis.t~>>>
2021-01-04 23:15:27 +01:00
* #+NAME: types *)
(* [[file:~/QCaml/ao/basis_gaussian.org::types][types]] *)
2020-10-09 09:47:57 +02:00
open Common
open Particles
open Linear_algebra
open Gaussian_integrals
open Operators
2020-10-02 23:35:56 +02:00
2021-01-04 23:15:27 +01:00
type t
(* types ends here *)
2020-10-02 23:35:56 +02:00
2021-01-04 23:15:27 +01:00
(* Access *)
2020-10-02 23:35:56 +02:00
2021-01-04 23:15:27 +01:00
(* [[file:~/QCaml/ao/basis_gaussian.org::*Access][Access:1]] *)
val basis : t -> Gaussian.Basis.t
val cartesian : t -> bool
val ee_ints : t -> Eri.t
val ee_lr_ints : t -> Eri_long_range.t
val eN_ints : t -> Electron_nucleus.t
val f12_ints : t -> F12.t
2020-10-03 00:54:17 +02:00
val f12_over_r12_ints : t -> Screened_eri.t
2021-01-04 23:15:27 +01:00
val kin_ints : t -> Kinetic.t
val multipole : t -> Multipole.t
val ortho : t -> Orthonormalization.t
val overlap : t -> Overlap.t
val size : t -> int
(* Access:1 ends here *)
2020-10-03 00:54:17 +02:00
2021-01-04 23:15:27 +01:00
(* Computation *)
2020-10-02 23:35:56 +02:00
2021-01-04 23:15:27 +01:00
(* [[file:~/QCaml/ao/basis_gaussian.org::*Computation][Computation:1]] *)
2021-01-28 00:34:26 +01:00
val values : t ->
Coordinate.t ->
Gaussian.Basis.t Vector.t
2021-01-04 23:15:27 +01:00
(* Computation:1 ends here *)
(* Creation *)
2020-10-02 23:35:56 +02:00
2021-01-04 23:15:27 +01:00
(* [[file:~/QCaml/ao/basis_gaussian.org::*Creation][Creation:1]] *)
val make : basis:Gaussian.Basis.t ->
?operators:Operator.t list ->
?cartesian:bool ->
2021-01-28 00:34:26 +01:00
Nuclei.t ->
t
2021-01-04 23:15:27 +01:00
(* Creation:1 ends here *)
2020-10-02 23:35:56 +02:00
2021-01-04 23:15:27 +01:00
(* Printers *)
2020-10-02 23:35:56 +02:00
2021-01-04 23:15:27 +01:00
(* [[file:~/QCaml/ao/basis_gaussian.org::*Printers][Printers:1]] *)
val pp : Format.formatter -> t -> unit
(* Printers:1 ends here *)