Fixed bug in xyz file

2017-07-05 12:57:26 +02:00 · 2017-07-05 12:57:26 +02:00 · 703ea08146
parent fea4176820
commit 703ea08146
1 changed files with 1 additions and 1 deletions
--- a/ocaml/Molecule.ml
+++ b/ocaml/Molecule.ml
@ -150,7 +150,7 @@ let of_xyz_file
  in
  let result =
    try
-      int_of_string x > 0
+      (int_of_string @@ String.strip x) > 0
    with
    | Failure "int_of_string"  -> false
  in