LCPQ/QCaml
10
1
Fork 0
mirror of https://gitlab.com/scemama/QCaml.git synced 2024-12-22 12:23:31 +01:00
Code Releases Activity

Envoi Nico

Browse Source
This commit is contained in:
Anthony Scemama 2020-03-30 18:06:21 +02:00
parent c01b984277
commit 4dccd121e0
2 changed files with 842 additions and 74 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

888
Notebooks/F12_fast.ipynb
View File

File diff suppressed because it is too large Load Diff

4
Simulation.ml
View File

@ -1,6 +1,6 @@
type t = { type t = {
charge : Charge.t; charge : Charge.t;
electrons : Electrons.t ; electrons : Electrons.t;
nuclei : Nuclei.t; nuclei : Nuclei.t;
basis : Basis.t; basis : Basis.t;
ao_basis : AOBasis.t; ao_basis : AOBasis.t;
@ -35,7 +35,7 @@ let make ?cartesian:(cartesian=false)
Electrons.make ~multiplicity ~charge nuclei Electrons.make ~multiplicity ~charge nuclei
in in
let charge = let chargre =
Charge.(Nuclei.charge nuclei + Electrons.charge electrons) Charge.(Nuclei.charge nuclei + Electrons.charge electrons)
in in