10
0
mirror of https://github.com/LCPQ/quantum_package synced 2024-11-03 20:54:00 +01:00

Bug in EMSL interface corrected

This commit is contained in:
Anthony Scemama 2015-01-23 16:53:06 +01:00
parent 42dacb1405
commit 1307a21dae

View File

@ -70,7 +70,7 @@ let run ?o b c m xyz_file =
in in
let accu = let accu =
Qpackage.root ^ "/scripts/get_basis.sh \"" ^ temp_filename Qpackage.root ^ "/scripts/get_basis.sh \"" ^ temp_filename
^ "\" " ^ basis ^ "\" \"" ^ basis ^"\""
in in
List.map nuclei ~f:(fun x -> x.Atom.element) List.map nuclei ~f:(fun x -> x.Atom.element)
|> apply accu |> apply accu
@ -102,7 +102,7 @@ let run ?o b c m xyz_file =
in in
let command = let command =
Qpackage.root ^ "/scripts/get_basis.sh \"" ^ temp_filename ^ Qpackage.root ^ "/scripts/get_basis.sh \"" ^ temp_filename ^
"\" " ^ basis ^ " " ^ key "\" \"" ^ basis ^ "\" " ^ key
in in
begin begin
let filename = let filename =