2021-01-01 12:52:50 +01:00
|
|
|
(* Type
|
|
|
|
*
|
|
|
|
* #+NAME: types *)
|
|
|
|
|
2021-01-01 16:39:33 +01:00
|
|
|
(* [[file:~/QCaml/mo/frozen_core.org::types][types]] *)
|
2021-01-01 12:52:50 +01:00
|
|
|
type kind =
|
|
|
|
| All_electron
|
|
|
|
| Small
|
|
|
|
| Large
|
|
|
|
(* types ends here *)
|
|
|
|
|
2021-01-01 16:39:33 +01:00
|
|
|
(* [[file:~/QCaml/mo/frozen_core.org::*Type][Type:2]] *)
|
2021-01-01 12:52:50 +01:00
|
|
|
type t
|
|
|
|
(* Type:2 ends here *)
|
|
|
|
|
|
|
|
(* Creation *)
|
|
|
|
|
|
|
|
|
2021-01-01 16:39:33 +01:00
|
|
|
(* [[file:~/QCaml/mo/frozen_core.org::*Creation][Creation:1]] *)
|
2021-01-01 12:52:50 +01:00
|
|
|
val make : kind -> Particles.Nuclei.t -> t
|
|
|
|
|
|
|
|
val of_int_list : int list -> t
|
|
|
|
val of_int_array : int array -> t
|
|
|
|
(* Creation:1 ends here *)
|
|
|
|
|
|
|
|
(* Access *)
|
|
|
|
|
|
|
|
|
2021-01-01 16:39:33 +01:00
|
|
|
(* [[file:~/QCaml/mo/frozen_core.org::*Access][Access:1]] *)
|
2021-01-01 12:52:50 +01:00
|
|
|
val num_elec : t -> int
|
|
|
|
val num_mos : t -> int
|
|
|
|
(* Access:1 ends here *)
|
|
|
|
|
|
|
|
(* Printers *)
|
|
|
|
|
|
|
|
|
2021-01-01 16:39:33 +01:00
|
|
|
(* [[file:~/QCaml/mo/frozen_core.org::*Printers][Printers:1]] *)
|
2021-01-01 12:52:50 +01:00
|
|
|
val pp : Format.formatter -> t -> unit
|
|
|
|
(* Printers:1 ends here *)
|